我有一个 Word 2007 文件,我想将 Courier New 字体的所有用法更改为
Lucida 控制台字体。我需要一个脚本来查找以该字体格式化的所有单词并将其更改为新字体。
我怎样才能做到这一点?
在Word中,您可以自己录制宏。然后打开 VBA 编辑器,可选择删除一些无用的内容(通常是文件中太多的选择或移动),您就得到了脚本。
编辑:将评论内容移至此处,以回复作者的评论。
录制宏时,在查找和替换对话框中,单击“全部替换”。然后停止录音。生成的宏如下所示:
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "tarte au pomme"
.Replacement.Text = "t aux pruneaux"
.Wrap = wdFindContinue
.MatchCase = False
' removed some stuff
End With
Selection.Find.Execute Replace:=wdReplaceAll
由此,您可以创建 VBScript 宏。您需要在对象浏览器中获取 wdReplaceAll 和 wdFindContinue 的值。
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)