在Word中通過VBA添加註釋包括頁碼字段

我有一個將註釋框添加到我的Word文檔中的過程，但我注意到它還添加了一個頁碼字段（通過選擇註釋框並選擇更新字段從上下文菜單中）。只有在通過VBA添加註釋時纔會發生這種情況，而不是在手動創建註釋時發生。有沒有一種方法可以禁止將頁碼添加到評論中？在Word中通過VBA添加註釋包括頁碼字段

代碼摘錄如下：

With Selection.Find 
    .Text = "Approvals" 
    .Forward = True 
    .Execute 

    If .Found = True Then 
     Selection.Comments.Add Range:=Selection.Range, Text:="My comment text" 
    End If 
End With

來源

2013-05-01 user2340454

說實話我是你的問題感到驚訝，但後來我意識到，我有同樣的問題，）谷歌搜索我發現一些想法剛剛搜索'頁fields'在註釋中刪除它們。我認爲這是你應該去的方式。我沒有找到任何選項來添加評論（與VBA），並避免自動添加頁碼，不幸的是... – 2013-05-02 22:31:55

這是我用來刪除這些頁字段。只是End Sub之前運行大量的代碼後，我插入以下內容：

For Each f In ActiveDocument.StoryRanges(wdCommentsStory).Fields 
    If f.Type = wdFieldPage Then 
     f.Delete 
    End If 
Next

它可能不漂亮，但它的工作。不幸的是，我認爲沒有辦法根據評論作者進行過濾。

For Each c In ActiveDocument.Comments 
    If c.Author = "Macro Name" Then 'Assuming you set it when you created the comment 
     Debug.Print c.Range.Fields.Count 'This prints a 0 
    End If 
Next

來源

2016-07-08 19:01:28

在Word中通過VBA添加註釋包括頁碼字段

回答

相關問題