1、打开需要转换的文档,按快捷键Alt+F11打开宏编辑器,插入——模块

2、把下面代码复制粘贴到模块里。Sub 全文编号转文本()争犸禀淫'将文档中全部自动编号转成正常文本。ActiveDocument.Range.ListFormat.ConvertNumbersToTextEnd Sub

3、关闭这个编辑器,视图——宏——查看宏——选中刚才添加的宏——运行

4、可以看到文档中所有的自动编号已经变成可以直接编辑额文本了
时间:2024-10-13 00:45:24
1、打开需要转换的文档,按快捷键Alt+F11打开宏编辑器,插入——模块
2、把下面代码复制粘贴到模块里。Sub 全文编号转文本()争犸禀淫'将文档中全部自动编号转成正常文本。ActiveDocument.Range.ListFormat.ConvertNumbersToTextEnd Sub
3、关闭这个编辑器,视图——宏——查看宏——选中刚才添加的宏——运行
4、可以看到文档中所有的自动编号已经变成可以直接编辑额文本了