既存のコメントのユーザー名の変更(Microsoft Word)
デニスは、変更の追跡を使用してコメントを挿入すると、ユーザーの名前がコメントに表示されることに注意します。ドキュメントを完成させる準備ができているが、変更の追跡がオンのままである場合、デニスは戻って1つ以上のコメントのユーザー名を変更できるかどうか疑問に思います。
変更を加えるためにできることがいくつかあります。まず、ユーザー名とイニシャルをコメントに含める名前に変更してから、効果的にコメントを再作成できます。 (コメントをクリップボードにコピーしてから、ドキュメントに貼り付けることができます。)
ただし、コメントの日付とタイムスタンプは、コメントを再作成したときに反映されるように更新されるため、これには欠点があります。
おそらく、より良いアプローチは、マクロを使用して変更を加えることです。コメントが作成されると、コメントコレクションに追加されます。コメントコレクションには、VBAからアクセスできます。各コメントには、コメントの作成者の名前とイニシャルをそれぞれ表すAuthorプロパティとInitialプロパティがあります。
次のマクロは、これらを変更する方法の例です。
Sub ChangeCommentAuthor() Dim J As Integer Dim sAuthorname As String Dim sInitial As String If Selection.Comments.Count = 0 Then MsgBox "No comments in your selection!", _ vbCritical + vbOKOnly, "Cannot perform action" Exit Sub End If sAuthorname = InputBox("New author name?", _ "Comments Author Name") If sAuthorname = "" Then End sInitial = InputBox("New author initials?", _ "Comments Initials") If sInitial = "" Then End With Selection For J = 1 To .Comments.Count .Comments(J).Author = sAuthorname .Comments(J).Initial = sInitial Next J End With End Sub
変更するコメントを含む選択を行い(コメントインジケータを含むメインドキュメント内のテキストを選択)、マクロを実行するだけです。プロンプトが表示されたら、新しい名前とイニシャルを入力します。マクロの実行が完了すると、何も変更されていないように見える場合があります。ドキュメントを保存して再読み込みすると、コメントの作成者名が指定どおりに変更されていることがわかります。
注:
このページ(または_WordTips_サイトの他のページ)で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。
_WordTips_は、費用効果の高いMicrosoftWordトレーニングのソースです。
(Microsoft Wordは、世界で最も人気のあるワードプロセッシングソフトウェアです。)このヒント(8612)は、Microsoft Word 97、2000、2002、および2003に適用されます。Wordのリボンインターフェイス(Word 2007)用のこのヒントのバージョンを見つけることができます。以降)ここ:
link既存のコメントのユーザー名の変更。