分享

Word文档中自动编号变文本

 昵称UHpe6 2017-05-19
在编写文档时,有时会用到自动编号,如本章中示例程序代码前的编号。在完成文档的编辑处理后,有时需要将这些动态的编号变为不能自动发生变化的静态编号。此时,可以通过使用简单的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 自动编号转换为文本

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约

    类似文章 更多