如何将word里面的自动编号变为文本
(2011-11-30 15:37:10)
标签:
word宏格式调整自动编号文化 |
分类: 资源分享 |
用word时自动编号的格式调整是个问题,因为自动编号时格式不能随意调整,特别是汇总不同人做的稿子,有的用自动编码,有的不用,很混乱。在百度上搜了一番居然有批处理的解决方案,试过很方便,遂拿出来分享。
如何把WORD编号转换为普通文本
原帖地址:
http://www.topsage.com/dispbbs.asp?boardID=22&ID=53405&page=1
解决方案:
打开WORD,依次点击:工具-宏-宏-在“宏名”框内输入宏名(好比:NumToTxt)-单击“创建”按钮,弹出Visual
Basic编辑器窗口,窗口内自动出现以下内容:
Sub NumToTxt()
End Sub
其中宏在哪天由谁创建,是根据你的创建的时间、电脑设置来决定的!
把下面的这段代码复制下来:
ActiveDocument.Content.ListFormat.ConvertNumbersToText
粘贴到编辑器窗口内容“End Sub”前面,现在,编辑器窗口的内容应该是这个样子:
Sub NumToTxt()
ActiveDocument.Content.ListFormat.ConvertNumbersToText
End Sub
最后点Visual
Basic编辑器保存按钮,将宏保存到Normal模板,然后关闭VBA窗口并返回Word。
打开你要处理的WORD文档,依次点击:工具-宏-宏-选中NumToTxt这个我们刚刚创建的宏(选中后在“宏名”框内会显示NumToTxt)-运行。OK
_______________________________________
以上为03版,现在用07版也差不多。
点“视图”页面,找到“宏”,在“查看宏”中——》宏名栏输入英文名称,比如NUMTOTXT,点“创建”弹出VB窗口,下面步骤和上文一样。