公式表示

justdoithjb 2003-02-14 06:07:12
怎样在excel 中用vba 实现一下的形式:
(3*4)/5 表示为 3*4
------------------------
5

程序自动执行
...全文
23 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
lgh4073 2003-02-21
  • 打赏
  • 举报
回复
注意下句
ActiveCell.FormulaR1C1 = "3*4" & Chr(10) & " 5"
" 5"而不是"5",5的前面含有空格,如果分子长,可以恰当增加空格
justdoithjb 2003-02-21
  • 打赏
  • 举报
回复
显示的结果不行.分母没有居中阿
lgh4073 2003-02-17
  • 打赏
  • 举报
回复
Sub Macro1()
'
' Macro1 Macro
' lgh 记录的宏 2003-2-17
'

'
ActiveCell.FormulaR1C1 = "3*4" & Chr(10) & " 5"
With ActiveCell.Characters(Start:=1, Length:=3).Font
.Name = "宋体"
.FontStyle = "常规"
.Size = 12
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleSingle
.ColorIndex = xlAutomatic
End With
With ActiveCell.Characters(Start:=4, Length:=3).Font
.Name = "宋体"
.FontStyle = "常规"
.Size = 12
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
End Sub

5,139

社区成员

发帖
与我相关
我的任务
社区描述
其他开发语言 Office开发/ VBA
社区管理员
  • Office开发/ VBA社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧