当前位置:首页 > 笔记本电脑 > 主流笔记本 > 技巧
将注释批量转为脚注
  • 2015/10/20 15:15:25
  • 类型:原创
  • 来源:电脑报
  • 报纸编辑:电脑报
  • 作者:琴心剑胆
【电脑报在线】一些商业文件中使用了“【】”来进行文字注释,这样阅读不连贯,需要将注释放到页脚处变成脚注。如果只有一两处可以手动修改,如果多了怎么办?



一些商业文件中使用了“【】”来进行文字注释,这样阅读不连贯,需要将注释放到页脚处变成脚注。如果只有一两处可以手动修改,如果多了怎么办?可以设计一个专门的转换宏代码。按组合键“Alt+F11”,打开Microsoft Visual Basic编辑器窗口,点击“插入→模块”,输入代码即可,关键代码如下:

    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.AddNtRange, , strNT

            myRange.SetRange myRange.End,ActiveDocument.Content.End - 1

            GoTo NF

董师傅点评:这个技巧在论文写作中也可以用到,特别是参考网上下载的论文资料时。

本文出自2015-10-19出版的《电脑报》2015年第41期 C.笔记本电脑
(网站编辑:ChengJY)


我来说两句(0人参与讨论)
发表给力评论!看新闻,说两句。
匿名 ctrl+enter快捷提交
读者活动
48小时点击排行
论坛热帖