公式编辑器高级指南.docVIP

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 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)

qbjzmxj5904 + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档