在编写文档时会用到自动编号这一功能,在完成文档的编辑处理后也会需要将动态的编号变为不能自动发生变化的静态编号,可以通过使用简单的VBA代码快速实现这种由动态向静态的转换的操作。
启动Word 2013并打开需要处理的文档,确保该文档中含有自动编号后,按“Alt+F11”键打开Visual Basic编辑器,并创建一个模块,在这一模块的代码窗口中输入程序代码:
Sub ListConverter()
ActiveDocument.Content.ListFormat.ConvertNumbersToText
End Sub
输入完成后按“F5”键运行程序,程序会将自动编号转换为文本。