【Word VBA】特定の書式の変更履歴だけ削除したい

あるところから

Word 文書に記録される変更履歴のうち、蛍光ペンに関する変更履歴だけが邪魔なのだが、どうにかならんかにゃ?

というご相談がありました。こういうやつですね。

簡単な方法としては、Word の「校閲」の変更履歴の表示設定で「書式設定」のチェックを外して書式設定の履歴を非表示にするやり方がありますが、それだと蛍光ペン以外の書式変更も非表示になってしまいます。

蛍光ペンに関する変更履歴だけを狙い撃ちにして非表示にするには、その部分だけを「承諾」してしまう手もあります。次のような簡単な VBA で、特定の書式の変更履歴だけを承諾できます。

Sub a()

    Dim r As Revision
    For Each r In ActiveDocument.Revisions

        If InStr(r.FormatDescription, "蛍光ペン") > 0 Then
            r.Accept
        End If

    Next

End Sub

 

購読する
通知を受け取る対象
guest
0 Comments
Newest
Oldest
Inline Feedbacks
View all comments