有时候编辑修改的word文档时，里面的自动编号可能不方便，我们可以把文中的自动编号统一转换成文本……
1.打开需要转换的文档，按快捷键Alt+F11打开宏编辑器，插入——模块。
2.把下面代码复制粘贴到模块里。
Sub全文编号转文本()
'将文档中全部自动编号转成正常文本。
ActiveDocument.Range.ListFormat.ConvertNumbersToText
EndSub
1.打开需要转换的文档，按快捷键Alt+F11打开宏编辑器，插入——模块。
2.把下面代码复制粘贴到模块里。
Sub全文编号转文本()
'将文档中全部自动编号转成正常文本。
ActiveDocument.Range.ListFormat.ConvertNumbersToText
EndSub