Word 使用宏根据文件名实现文件版本号自动更新_rev01

最新推荐文章于 2025-04-08 23:55:02 发布

nksmiles

最新推荐文章于 2025-04-08 23:55:02 发布

阅读量2.4k

点赞数

分类专栏： Word VBA 文章标签： variables properties list system components string

本文链接：https://blog.youkuaiyun.com/nksmiles/article/details/7336160

版权

本文介绍如何利用Word的宏、自定义属性和域功能，根据文件名自动更新文档的版本号、日期、更新及核查人员信息，解决手动更新繁琐易错的问题。通过设置宏代码和窗体界面，实现文件版本号的智能管理。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

因工作需要，需要经常更新文档内容。每次更新后文件版本号等信息都需要一一更新，过于繁琐且容易遗漏。因为更新部分有统一的格式，考虑利用Word文件的自定义属性和域功能实现自动更新这些常规内容。

主要包括：文档名，版本号（在文件名中有统一命名规则），文档更新日期，更新人员，核查人员等。通过文件自定义属性/域/宏结合使用，可以很好的实现文件版本号自动更新的问题。

Modules代码：

Option Explicit


Public posIssueNo As Byte

Sub Update()
'
' NS_New Macro
' Macro created 03/08/2012 by Vico Song
'
    ''''''''''''''''''''''''''''''''''''''''''''
    ''' Define variables  ''''''''''''''''''''''
    ''''''''''''''''''''''''''''''''''''''''''''
    Dim vProperties, vDefaultPropertyValue, vAuthors, vCheckers, v As Variant
    Dim i, lenDocName As Integer
    Dim b As Boolean
    Dim s As String
    
    
    ''''''''''''''''''''''''''''''''''''''''''''
    ''' Initial variables  '''''''''''''''''''''
    ''''''''''''''''''''''''''''''''''''''''''

最低0.47元/天解锁文章