调出word的“开发工具”选项

文件->选项->自定义功能区->选中开发工具->确定

创建宏

开发工具->宏->创建宏

编写宏

在弹出来的框里，替换代码为

Sub num2txt()
ActiveDocument.Content.ListFormat.ConvertNumbersToText
End Sub

换完直接叉掉

使用宏

你就发现，所有自动生成的编号，都变成了纯文本