- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
公式编辑器高级指南
MS Office“公式编辑器”是Design Science()设计的MathType的简化版本,用它可以十分方便地录入、编排各种数学公式及一些简单的化学公式。其操作直观简单,即使是初学者也能够很容易掌握,是编写科技论文的好帮手。由于工作的需要,笔者经常需要录入、修改大量的数学公式,为了尽可能地提高工作效率,不得不对公式编辑器进行了一番仔细研究,总结了几点心得体会,希望与经常使用公式编辑器的朋友们交流。
1. MathType简介
MathType是“公式编辑器”的功能强大而全面的版本。如果要经常在文档中编排各种复杂的数学、化学公式,则MathType是非常合适的选择。MathType用法与“公式编辑器”一样简单易学,而且其额外的功能使您的工作更快捷,文档更美观。
MathType 包括:
(1)Euclid字体设置了几百个数学符号。
(2)具有应用于几何、化学及其他方面的新样板和符号。
(3)专业的颜色支持。
(4)为全球广域网创建公式。
(5)将输出公式译成其他语言(例如:TeX、AMS-TeX、LaTeX、MathML及自定义语言)的翻译器。
(6)用于公式编号、格式设置及转换Microsoft Word文档的专用命令。
(7)可自定义的工具栏,可容纳最近使用过的几百个符号、表达式和公式。
(8)可自定义的键盘快捷键。
MathType的共享版可以从如下地址下载:
/sort.php?class=Othersoftclass=Math。
2. 公式编辑器的常用技巧
(1)修改公式编辑器提示窗口显示次数。
对于经常录入大量数学公式的朋友来说,最讨厌的就是公式编辑器的提示:每当用户使用了若干次公式编辑器后,就会有一个公式编辑器提示对话框弹出来,问你是否想了解有关“数学类型”的详细内容,如图1所示。若不选择“不再显示此信息”,则弹出间隔为100次;若选择“不再显示此信息”,则弹出间隔为500次,非常烦人。经过多次的研究,笔者发现该对话框虽然无法禁止,但可以延长其发作间隔:将500次延长为32767次。修改方法如下:
图1 公式编辑器的提示
打开注册表,找到表项:
HKEY_CURRENT_USER\Software\Microsoft\Equation Editor\3.0\Options\General
将MTUpgradeDialog的数值改为32767。
(2)用VBA控制文档中的公式。
总的来说,用VBA控制公式编辑器不太容易,特别是公式编辑器中的数据。下面几个小例子以Office 2000提供的公式编辑器3.01为例展示了控制公式编辑器的几种方法,希望能给对VBA感兴趣的同行一点启发。
例1:逐个打开文档中已有公式
Sub 编辑公式()
查找并编辑公式
On Error Resume Next 若有错误,执行下一条语句
Num_EQ = False 是否包含公式
判断文档中是否包含公式,若包含则进行编辑整理,否则退出退程序
For num = 1 To ActiveDocument.InlineShapes.Count
s = ActiveDocument.InlineShapes(num).OLEFormat.ClassType
If s = Equation.3 Then
Num_EQ = True
Exit For 包含公式,退出循环
End If
Next num
If Not Num_EQ Then 没有公式,退出子程序
Exit Sub
End If
Search: 开始查找inlineshap对象,包括公式、图形,等等
Selection.Find.ClearFormatting
With Selection.Find
.Text = ^g
.Replacement.Text =
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchByte = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchWildcards = True
End With
Selection.Find.Execute
If Selection.InlineShapes(1).OLEFormat.ClassType = Equation.3 Then 如果是公式
Selection.InlineShapes(1).OLEFormat.DoVerb VerbIndex:=1 打开公式编辑器
Else
GoTo Search 若不是公式,继续查找
End If
End S
原创力文档


文档评论(0)