将Word文档中的自动编号转换为静态编号的方法（word中自动编号换成文本）

将Word文档中的自动编号转换为静态编号的方法（word中自动编号换成文本）

在编写文档时，有时会用到自动编号，如本章中示例程序代码前的编号。在完成文档的编辑处理后，有时需要将这些动态的编号变为不能自动发生变化的静态编号。此时，可以通过使用简单的VBA代码快速实现这种由动态向静态的转换，下面介绍将Word文档中的自动编号转换为静态编号的具体操作方法。

1、启动Word 2013并打开需要处理的文档，该文档中含有自动编号，如图1所示。

图1　打开含有自动编号的文档

2、按“Alt+F11”键打开Visual Basic编辑器，创建一个模块，在该模块的代码窗口中输入程序代码，如图2所示。具体的程序代码如下。

图2　在“代码”窗口中输入程序代码

01 Sub ListConverter()

02 ActiveDocument.Content.ListFormat.ConvertNumbersToText

03 End Sub

3、按“F5”键运行程序，程序将自动编号转换为文本，如图3所示。

图3　自动编号转换为文本

本文已经收录至：《Office 2013应用技巧实例大全》 - Office2013高级应用篇

版权声明：本文内容由网络用户投稿，版权归原作者所有，本站不拥有其著作权，亦不承担相应法律责任。如果您发现本站中有涉嫌抄袭或描述失实的内容，请联系我们jiasou666@gmail.com 处理，核实后本网站将在24小时内删除侵权内容。