一些商业文件中使用了“【】”来进行文字注释,这样阅读不连贯,需要将注释放到页脚处变成脚注。如果只有一两处可以手动修改,如果多了怎么办?可以设计一个专门的转换宏代码。按组合键“Alt+F11”,打开MICroSOFt Visual Basic编辑器窗口,点击“插入一模块”,输入代码即可,关键代码如下:
Dim myRange As Range,NtRange As Range,strNT As String
Application ScreenUpdating= False
Set myRange= ActiveDocument.Content
NF: WithmyRange.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
本文关键字:文章 电脑使用技巧,电子学习 - 电脑使用技巧