公式編輯器高級指南

1、公式編輯器高級指南 MSOffice“公式編輯器”是DesignScience（）設計的mathtype的簡化版本，用它可以十分方便地錄入、編排各種數(shù)學公式及一些簡單的化學公式。其操作直觀簡單，即使是初學者也能夠很容易掌握，是編寫科技論文的好幫手。由于工作的需要，筆者經(jīng)常需要錄入、修改大量的數(shù)學公式，為了盡可能地提高工作效率，不得不對公式編輯器進行了一番仔細研究，總結(jié)了幾點心得體會，希望與經(jīng)常使用公式編輯器的朋友們交流。設計的MathType的簡化版本，用它可以十分方便地錄入、編排各種數(shù)學公式及一些簡單的化學公式。其操作直觀簡單，即使是初學者也能夠很

2、容易掌握，是編寫科技論文的好幫手。由于工作的需要，筆者經(jīng)常需要錄入、修改大量的數(shù)學公式，為了盡可能地提高工作效率，不得不對公式編輯器進行了一番仔細研究，總結(jié)了幾點心得體會，希望與經(jīng)常使用公式編輯器的朋友們交流。1.MathType簡介MathType是“公式編輯器”的功能強大而全面的版本。如果要經(jīng)常在文檔中編排各種復雜的數(shù)學、化學公式，則MathType是非常合適的選擇。MathType用法與“公式編輯器”一樣簡單易學，而且其額外的功能使您的工作更快捷，文檔更美觀。MathType包括：（1）Euclid字體設置了幾百個數(shù)學符號。（2）具有應用于幾何、化學及其他方面的新樣板和符號。（3）專業(yè)的

3、顏色支持。（4）為全球廣域網(wǎng)創(chuàng)建公式。（5）將輸出公式譯成其他語言（例如：TeX、AMS-TeX、LaTeX、MathML及自定義語言）的翻譯器。（6）用于公式編號、格式設置及轉(zhuǎn)換MicrosoftWord文檔的專用命令。（7）可自定義的工具欄，可容納最近使用過的幾百個符號、表達式和公式。（8）可自定義的鍵盤快捷鍵。MathType的共享版可以從如下地址下載：/sort.php?class=Other&softclass=Math。2.公式編輯器的常用技巧（1）修改公式編輯器提示窗口顯示次數(shù)。對于經(jīng)常錄入大量數(shù)學公式的朋友來說，最討厭的就是公式

4、編輯器的提示：每當用戶使用了若干次公式編輯器后，就會有一個公式編輯器提示對話框彈出來，問你是否想了解有關“數(shù)學類型”的詳細內(nèi)容，如圖1所示。若不選擇“不再顯示此信息”，則彈出間隔為100次；若選擇“不再顯示此信息”，則彈出間隔為500次，非常煩人。經(jīng)過多次的研究，筆者發(fā)現(xiàn)該對話框雖然無法禁止，但可以延長其發(fā)作間隔：將500次延長為32767次。修改方法如下：圖1公式編輯器的提示打開注冊表，找到表項：HKEY_CURRENT_USERSoftwareMicrosoftEquationEditor3.0OptionsGeneral將MTUpgradeDialog的數(shù)值改為32767。（2）用VBA

5、控制文檔中的公式?？偟膩碚f，用VBA控制公式編輯器不太容易，特別是公式編輯器中的數(shù)據(jù)。下面幾個小例子以Office2000提供的公式編輯器3.01為例展示了控制公式編輯器的幾種方法，希望能給對VBA感興趣的同行一點啟發(fā)。例1：逐個打開文檔中已有公式Sub編輯公式()查找并編輯公式OnErrorResumeNext若有錯誤，執(zhí)行下一條語句Num_EQ=False是否包含公式判斷文檔中是否包含公式，若包含則進行編輯整理，否則退出退程序Fornum=1ToActivedocument.InlineShapes.Counts=Activedocument.InlineShapes(num).OLEFo

6、rmat.ClassTypeIfs=Equation.3ThenNum_EQ=TrueExitFor包含公式，退出循環(huán)EndIfNextnumIfNotNum_EQThen沒有公式，退出子程序ExitSubEndIfSearch:開始查找inlineshap對象，包括公式、圖形，等等Selection.Find.ClearFormattingWithSelection.Find.Text=g.Replacement.Text=.Forward=True.Wrap=wdFindContinue.Format=False.MatchCase=False.MatchWholeWord=False.M

7、atchByte=False.MatchAllWordForms=False.MatchSoundsLike=False.MatchWildcards=TrueEndWithSelection.Find.ExecuteIfSelection.InlineShapes(1).OLEFormat.ClassType=Equation.3Then如果是公式Selection.InlineShapes(1).OLEFormat.DoVerbVerbIndex:=1打開公式編輯器ElseGoToSearch若不是公式，繼續(xù)查找EndIfEndSub例2：公式轉(zhuǎn)換，將文檔中的字母符號公式轉(zhuǎn)換為公式對象Su

8、b公式轉(zhuǎn)換()Selection.CutSelection.InlineShapes.AddOLEObjectClassType:=Equation.3,FileName:=_,LinkTofile:=False,DisplayAsIcon:=FalseSendKeys%SendKeysRIGHTdowndowndowndownenterEndSub例3：向文檔中插入新公式Sub插入公式()插入新公式Selection.InlineShapes.AddOLEObjectClassType:=Equation.3,LinkTofile:=_False,DisplayAsIcon:=FalseEn

9、dSub例4：整理公式，即將公式“過一遍”，使其重新應用定義好的樣式尺寸Sub整理公式()自動整理公式格式OnErrorResumeNext若有錯誤，執(zhí)行下一條語句Num_EQ=False是否包含公式判斷文檔中是否包含公式，若包含則進行編輯整理，否則退出退程序Fornum=1ToActivedocument.InlineShapes.Counts=Activedocument.InlineShapes(num).OLEFormat.ClassTypeIfs=Equation.3ThenNum_EQ=TrueExitFor包含公式，退出循環(huán)EndIfNextnumIfNotNum_EQThen沒

10、有公式，退出子程序ExitSubEndIfSearch:開始查找inlineshap對象，包括公式、圖形，等等Selection.Find.ClearFormattingWithSelection.Find.Text=g.Replacement.Text=.Forward=True.Wrap=wdFindContinue.Format=False.MatchCase=False.MatchWholeWord=False.MatchByte=False.MatchAllWordForms=False.MatchSoundsLike=False.MatchWildcards=TrueEndWith

11、Selection.Find.ExecuteIfSelection.InlineShapes(1).OLEFormat.ClassType=Equation.3Then如果是公式Selection.InlineShapes(1).OLEFormat.DoVerbVerbIndex:=1打開公式編輯器IfTasks.Exists(公式編輯器)=TrueThen如果打開了公式編輯器，則激活WithTasks(公式編輯器).Activate.WindowState=wdWindowStateNormalEndWithSendKeys%,True發(fā)送推出指令SendKeysDOWN,TrueSendK

12、eysDOWN,TrueSendKeysENTER,TrueEndIfElseGoToSearch若不是公式，繼續(xù)查找EndIfEndSub例5：放大、縮小公式（也可用于行內(nèi)圖形）Sub縮小圖形()h=Selection.InlineShapes(1).Heightw=Selection.InlineShapes(1).WidthSelection.InlineShapes(1).Width=w*0.99Selection.InlineShapes(1).ScaleHeight=Selection.InlineShapes(1).ScaleWidthEndSubSub放大圖形()h=Selec

13、tion.InlineShapes(1).Heightw=Selection.InlineShapes(1).WidthSelection.InlineShapes(1).Width=w*1.01Selection.InlineShapes(1).ScaleHeight=Selection.InlineShapes(1).ScaleWidthEndSub上述幾個例子若配合快捷鍵使用，會大大提高處理公式的效率。但用VBA處理公式畢竟功能有限，若希望能更全面地用程序控制公式，需要使用MathType。3.化學反應式、化學結(jié)構(gòu)式的編排用公式編輯器可以編排化學反應式和化學結(jié)構(gòu)式，已經(jīng)有人進行了這方面的嘗試，但筆者認為，由于公式編輯器本身的局限性，用它來排化學反應式和化學結(jié)構(gòu)式實在很勉強，且效率低下。在這方面，MathType要比公式編輯器更勝一籌。其實，如果要經(jīng)常編排化學反應式和化學結(jié)構(gòu)式，如Visio，Smart