- ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:Excel VBA : セルのコメントの書式設定をするマクロを教えて下さい。)
Excel VBAでセルのコメントの書式設定を自動化する方法
このQ&Aのポイント
- Excel VBAを使用して、セルのコメントの書式設定を自動化する方法を教えてください。
- マクロの記録で生成されたスクリプトを実行するとエラーが発生するため、正しい記述方法を教えてください。
- セルごとに表示されるコメントの枠を右クリックし、「コメントの書式設定」ダイアログで設定を自動化したいです。
- みんなの回答 (1)
- 専門家の回答
質問者が選んだベストアンサー
セルのコメントの該当プロパティ変更は Sub Macro1( r as Range ) ' コメントが存在するかチェック if not r.Comment is Nothing then r.Comment.Shape.Placement = xlMove end if End Sub コレを呼び出すマクロ Sub Macro2() dim rr as range ' 画面更新停止 Application.ScreenUpdating = False ' 変更するセル範囲は適宜修正してください for each rr in Range("B1:B20") Macro1 rr Next ' 画面更新再開 Application.ScreenUpdating = True End Sub
お礼
おおおおぉーーーーっ!!!!!!! できました!! 20+10pt 付けられないのは何でだぁ?