ExcelのコメントをWord文書にエクスポートする方法

Excelワークブックには、さまざまな編集者からのコメントが多数含まれている場合があります。 これらのコメントは、関連するセルに添付されている場合に最も関連性がありますが、独自のストーリーを形成することもあります。 たとえば、あなたと同僚が売上予測シートを一緒に編集した場合、そのシートのコメントはそのシートの計算式に関するあなたの会話を追跡します。 これらのコメントを分離する1つの方法は、それらをWord文書に送信するVisual Basicマクロを書くことです。

1。

Excelワークブックを開き、 "Alt-F11"を押してExcelのVisual Basicエディタを開きます。

2。

Wordが自動的に開かない場合は、プロジェクトウィンドウの[モジュール]フォルダにある[NewMacros]モジュールをダブルクリックします。

3。

新しいマクロを開くには、次のように入力します。

Sub mcrComment（）

4。

マクロの変数を宣言するには、次のように入力します。

コメントとして薄暗いexcelCommentオブジェクトとして薄暗いwordProgram

5。

Word文書を作成するには、次のように入力します。

wordProgram = CreateObject（ "Word.Application"）を設定します。

6。

Wordオブジェクトに作用するループを開くには、次のように入力します。

wordProgramとは

7。

Word文書を開いて選択するには、次のように入力します。

.Visible = True .Documents.Add DocumentType：= 0

8。

各コメントに作用するループを開くには、次のように入力します。

ActiveSheet.Commentsの各excelCommentについて

9。

次のように入力して、各コメントの作成者とセルアドレスをWord文書に印刷します。

.Selection.TypeText excelComment.Parent.Address＆vbTab＆excelComment.Text

10。

Word文書に各コメントを印刷するには、次のように入力します。

.Selection.TypeParagraph

11。

次を入力してFor-Nextループを閉じます。

次

12。

次のように入力してWithループを閉じます。

で終わる

13。

次のように入力してマクロを閉じます。

終了サブ

14。

マクロを実行し、そしてWord文書にコメントをエクスポートするために、「F5」を押します。