加载中…批量修改word中公式的字体
(2022-07-17 16:20:13)
标签：
wordvba |
分类： WORD |
word中公式默认字体是cambria，一般我们需要使用time new romans。从网上似乎也没有找到能够安装的time new
romans公式字体（注意time new
romans文档字体是有的，但公式字体没有）。一种方法是将其转化成文本字体后，再修改成time new
romans。但只能一个一个修改。这里看到一种可以批量修改公式字体的方法，即利用VBA小程序，进行批量修改，亲测效果很好。代码如下：
Sub 一键修改公式字体()
' 一键修改公式字体 宏
Dim 公式 As OMath
Rem 循环遍历当前文档的公式
For Each 公式 In ActiveDocument.OMaths
Rem 公式转为普通文本
公式.ConvertToNormalText
ActiveDocument.Content.Font.NameAscii = "Times New
Roman"
Next
End Sub
喜欢
0
赠金笔