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

Kutools for Office — 1つのスイート、5つのツールで、もっと多くのことを成し遂げましょう。

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

Author Xiaoyang Last modified

複数の人がレビューした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 - 100以上の驚くべき機能でWordの操作体験を向上！

🤖 Kutools AI機能: AIアシスタント / リアルタイムアシスタント / スーパー ポリッシュ（書式維持）/ スーパー トランスレート（書式維持）/ AI編集 / AI校正...

📘 文書マスター: ページの分割 / 文書の結合 / 選択範囲を様々な書式（PDF/TXT/DOC/HTMLなど）でソリューションをエクスポート / 一括PDF変換...

✏ テキスト編集: 複数ファイルを対象に一括検索と置換 /すべての画像をリサイズ / 表の行全体と列を転置 / 表をテキストに変換...

🧹 簡単クリーン:余分なスペース / セクション区切り / テキストボックス / ハイパーリンクをすばやく削除 /さらに多くの削除ツールは「削除」グループでご利用いただけます...

➕ クリエイティブ挿入: 千の区切り文字を挿入 / チェックボックス / ラジオボタン / QRコード / バーコード / 複数の画像 / 詳細は「挿入」グループで発見...

🔍 高精度な選択: 特定のページや表、図形、見出し段落などをピンポイント選択 /さらに多くの 選択 機能でナビゲーションを強化...

⭐ スター強化: 任意の範囲へナビゲーション / 定型テキストの自動挿入 / 文書ウィンドウ間の切り替え /11 種の変換ツール...

🌍 40以上の言語に対応: Kutoolsはあなたの言語でお使いいただけます ― 英語、スペイン語、ドイツ語、フランス語、中国語など40言語以上に対応！

Kutools and Kutools Plus tabs on the Word Ribbon
👉これらの機能を試してみたいですか？今すぐKutools for Wordをダウンロード！🚀
 

✨ Kutools for Office –1回のインストールで5つのパワフルツールが使えます！

Office Tab Pro · Kutools for Excel · Kutools for Outlook · Kutools for Word · Kutools for PowerPoint を含む

📦5つのツール全てが1つのスイートに | 🔗 Microsoft Officeとシームレスに統合 | ⚡ 保存時間・生産性をすぐにアップ

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

Kutools for Word - 100+ のツールでWordをよりパワフルに

無料ダウンロード 今すぐ購入 Kutoolsの詳細はこちら