MS Word 2003打开自定义属性值增量

Question

我有一个Word文档，我在其中创建了一个自定义属性（文件＆gt;属性＆gt;自定义）

名称：autoInc

类型：数字

价值：999

我想知道如何自动将值递增1并在每次保存此文件时覆盖当前值。

Answer 1

我会使用Document_Save事件，并在其中增加值。这样做的一个很好的链接是here（并且有点过于复杂而无法发布摘录）。

虽然如果你想简单地做到这一点，我认为这样可行：

ActiveDocument.CustomDocumentProperties("autoInc").Value =  
  ActiveDocument.CustomDocumentProperties("autoInc").Value +  1