メインコンテンツへスキップ

Word文書で特定の1人のユーザーからの変更履歴を承認するにはどうすればよいですか?

Author: Xiaoyang Last Modified: 2025-05-23

複数の人がレビューしたWord文書があるとします(次のスクリーンショット参照)。ここで、特定の1人からの変更履歴のみを承認する必要があります。このタスクをWord文書でどのように解決できますか?

Document with changes made by different people

Wordで特定の1人のユーザーからの変更履歴を承認する

VBAコードを使用して特定の1人のユーザーからの変更履歴を承認する


Wordで特定の1人のユーザーからの変更履歴を承認する

特定の1人のユーザーからの変更履歴のみを承認するには、Wordの「表示マークアップ」機能が役立ちます。以下のように操作してください:

1. 変更履歴が含まれるWordファイルを開き、「校閲」>「 表示マークアップ」>「特定の人」をクリックし、「すべてのレビュアー」のチェックを外してすべてのレビューを非表示にします。スクリーンショットをご覧ください:

All Reviewers checked on the Specific People dropdown

2. 次に、「表示マークアップ」>「特定の人」を再度クリックし、変更履歴を承認したいレビュアーをチェックします。スクリーンショットをご覧ください:

Specific person selected from the Specific People dropdown

3. その後、「承認」>「表示されているすべての変更を承認」をクリックします。スクリーンショットをご覧ください:

Accept All Changes Shown option on the Accept dropdown

4. これで、この特定の人物からの変更履歴のみが承認されました。スクリーンショットをご覧ください:

Track changes from this specific person are accepted

5. 最後に、他のレビュアーからの変更履歴を表示するには、「表示マークアップ」>「特定の人」をクリックし、「すべてのレビュアー」をチェックします。次のスクリーンショットを参照してください:

All Reviewers checked on the Specific People dropdown


VBAコードを使用して特定の1人のユーザーからの変更履歴を承認する

上記の方法が少し面倒な場合、ここでは簡単なVBAコードをご紹介します。以下の手順で行ってください:

1. ALT + F11キーを押して、Microsoft Visual Basic for Applicationsウィンドウを開きます。

2. 「 挿入」>「モジュール」をクリックし、次のマクロをモジュールウィンドウに貼り付けます。

VBAコード:特定の1人のユーザーからの変更履歴を承認する:

Sub Acceptoneuser()
    For Each xChange In ActiveDocument.Revisions
        If xChange.Author = "RubyMie" Then
            xChange.Accept
        End If
    Next
End Sub

注意: 上記のコードでは、ユーザー名「RubyMie」を必要に応じて変更してください。

3. そして、F5キーを押してこのコードを実行すると、コードで指定したレビュアーからの変更履歴のみが承認されます。スクリーンショットをご覧ください:

Only the track changes from the reviewer you specified in the code are accepted

最高のオフィス生産性ツール

Kutools for Word - Wordの体験を100以上の素晴らしい機能で向上させましょう!

🤖 Kutools AI機能: AIアシスタント / リアルタイムアシスタント / スーパー ポリッシュ (形式を保持) / スーパー トランスレート (形式を保持) / AI編集 / AI校正...

📘 文書のマスタリー: ページの分割 / 文書の結合 / 様々な形式で選択をエクスポート (PDF/TXT/DOC/HTML...) / 一括PDF変換...

内容の編集: 複数ファイルにわたる一括検索と置換 /すべての画像をリサイズ / 表の転置 / 表をテキストに変換...

🧹 簡単なクリーンアップ:余分なスペース / セクション区切り / テキストボックス / ハイパーリンクを一掃 / その他の削除ツールは削除グループへ...

創造的な挿入: 千の区切りを挿入 / チェックボックス / ラジオボタン / QRコード / バーコード / 複数の画像 / 挿入グループでさらに発見...

🔍 精密な選択: 特定のページ / / 図形 / 見出し段落を特定 / より多くの 選択 機能でナビゲーションを強化...

スター強化: 任意の場所に移動 / 繰り返しテキストを自動挿入 / 文書ウィンドウ間を切り替え /11 変換ツール...

Kutools and Kutools Plus tabs on the Word Ribbon
👉これらの機能を試してみませんか?今すぐKutools for Wordをダウンロード!🚀