同事老徐拿來一份Word文檔,這是他請人錄入的稿件,其中的注文都使用“【】”進行表示(見圖1),但這些注文放在正文中,看起來不是很合適。現在老徐希望將這些注文放到頁腳處,該如何實現呢?

圖1 Word文檔原稿
我們可以利用VBA宏代碼對“【】”進行批量轉換,按下“Alt+F11”組合鍵,打開Microsoft Visual Basic編輯器窗口,依次執行“插入→模塊”,在右側的模塊窗格中手工粘貼如下代碼,這里的宏名稱可以任意命名:
| Sub 腳注轉換() Dim myRange As Range, NtRange As Range, strNT As String application.ScreenUpdating = False Set myRange = ActiveDocument.Content NF: With myRange.Find .Text = "【*】" .MatchWildcards = True Do While .Execute = True Set NtRange = ActiveDocument.Range(myRange.Start, myRange.Start) strNT = myRange.Text myRange.Delete ActiveDocument.Footnotes.Add NtRange, , strNT myRange.SetRange myRange.End, ActiveDocument.Content.End - 1 GoTo NF Loop End With Application.ScreenUpdating = True End Sub |
代碼輸入完成之后,單擊工具欄上的保存按鈕,依次執行“文件→關閉并返回到Microsoft Word”,返回Word界面之后,按下“Alt+F8”組合鍵,選中列表框中的“腳注轉換”宏,單擊右側的“運行”按鈕,很快就可以看到圖2所示的效果。

圖2 Word腳注效果
按下“Ctrl+H”組合鍵,打開“查找和替換→替換”對話框,將“查找內容”設置為“【”,“替換為”設置為空,即什么也不輸入,單擊“全部替換”按鈕可以將文檔中所有的“【”刪除,接下來再使用同樣的方法刪除所有的“】”,感興趣的朋友不妨一試。
新聞熱點
疑難解答