WORD中自动编号等特殊格式转化为可编辑文本的方法  

2009-12-23 09:55:21|  分类： 学海无涯 |字号 订阅

       为了高效地撰写毕业论文，在论文中使用word的自动编号、图、表、公式的题注、交叉引用、endnote插入参考文献等功能是避免不了的。论文完成后，文章中便有了各种各样的样式格式，对于自己来说是很方便的，但是对于其他人来看的话，可能会有些疑惑（莫名多出来的样式会让很多没有用到word高级功能的人感到厌烦），这时有必要对word进行全面格式化，转化成纯文本，达到每个字符均可编辑的目的。以下是我在论文写作过程中总结的达到此目的的方法：

       1、首先将未格式化的word文档另存为一份新文档，这样做的目的是以后如果论文有修改，可以到未格式化的文档中直接修改，编号什么的就不会乱，然后直接格式化就行了，十分方便。

       2、在新文档中全选，然后点击“ctrl+shift+F9”,这样可以将文档中的全部超链接（包括自动生成的目录）、交叉引用、endnote插入的参考文献全部格式化为文本。然后可以发现只剩下自动编号的项目未格式化。

       3、据说word的宏功能是无所不能，小弟也是初步尝到了它的威力。打开word的宏功能，创建一个新的宏，取好名字，比如叫做“编号转文本”，然后“确定”，进入宏编辑器，可以看到如图中红色的代码，然后按照如下所示补全相应的代码，保存，运行可以看到，自动编号的项目也可以编辑了，成功转化为文本！这里有个问题需要注意，运行代码前，光标不要放在自动编号项目上，否则转化后会有灰色底纹，放在其它文本处就OK了！！

Sub 编号转文本()
 Dim kgslist As List
    For Each kgslist In ActiveDocument.Lists
        kgslist.ConvertNumbersToText
    Next
End Sub

最后为了使用方便，可以把上述定义的宏设置为一个图标放置到快速工具栏中，以后只要点击一下即可快速格式化，很方便的（word 2007添加图标是在“office按钮”->“word选项”->“自定义”中设置）。我认为利用宏，可以把上述两个格式化过程合并为一个，一次点击就行了。时间紧，就先不研究了。有兴趣的朋友不妨一试。以上是我在使用word过程中的一点收获。与大家共勉！！