對于從事化學教學或需要撰寫科技論文的朋友來說，化學分子式是必須涉及的內(nèi)容之一，如果化學分子式的數(shù)量不是太多，那么可以將相關(guān)的數(shù)字手工設(shè)置為下標，或者使用格式刷。不過，如果涉及的化學分子式數(shù)量比較多，而且其中又有其他的數(shù)學式，那么手工操作將相當繁瑣，而且也容易遺漏，下面介紹三種解決這一難題的方法。

利用VBA宏代碼

可以借助VBA代碼批量設(shè)置分子式下標，打開Microsoft Visual Basic編輯器窗口，插入一個空白模塊，粘貼如下代碼：

Sub test()

With ActiveDocument.Characters

For i = 2 To .Count

If .Item(i).Text Like "#" And (.Item(i - 1).Text Like "[A-Za-z]" Or .Item(i - 1).Font.Subscript = True) Then

.Item(i).Font.Subscript = True

End If

Next i

End With

End Sub

返回Word主界面，按下“Alt+F8”組合鍵，打開“宏”對話框，運行test宏，很快就可以看到圖中所示的效果（如圖1），而其中的非化學分子式的數(shù)字并沒有被更改為下標，很方便吧？

使用兩次替換法

上述方法還是麻煩了些，畢竟并非每時每刻都能記住上述代碼，其實還可以使用兩次替換的方法解決這一問題。

打開“替換”對話框，將查找內(nèi)容設(shè)置為“^$^#”，光標跳轉(zhuǎn)到“替換為”文本框，設(shè)置為下標格式，這一步驟是將化學分子式中的字母和數(shù)字統(tǒng)一替換為下標格式（如圖2）；不關(guān)閉“替換”對話框，將查找內(nèi)容設(shè)置為“^$”，取消下標的設(shè)置，這一步驟是將已經(jīng)設(shè)置為下標的字母恢復為正常狀態(tài)，此時可以看到化學分子式中的所有數(shù)字已經(jīng)被統(tǒng)一設(shè)置為下標格式。

使用兩次查找法

也可以使用兩次查找的方法：打開“查找”對話框，將查找內(nèi)容設(shè)置為“^$^#”，將“在以下項中查找”設(shè)置為“主文檔”，此時會自動選中化學分子式中后面帶數(shù)字的字母；不關(guān)閉“查找”對話框，將查找內(nèi)容更改為“^#”，此時需要將“在以下項中查找”設(shè)置為“當前所選內(nèi)容”，所選中的就只是化學分子式中的數(shù)字了（如圖3）。接下來的操作就簡單多了：保持當前的選中狀態(tài)，單擊工具欄“字體”功能組的下標按鈕即可將這些數(shù)字批量設(shè)置為下標。