• ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:Excel VBA : セルのコメントの書式設定をするマクロを教えて下さい。)

Excel VBAでセルのコメントの書式設定を自動化する方法

このQ&Aのポイント
  • Excel VBAを使用して、セルのコメントの書式設定を自動化する方法を教えてください。
  • マクロの記録で生成されたスクリプトを実行するとエラーが発生するため、正しい記述方法を教えてください。
  • セルごとに表示されるコメントの枠を右クリックし、「コメントの書式設定」ダイアログで設定を自動化したいです。

質問者が選んだベストアンサー

  • ベストアンサー
  • redfox63
  • ベストアンサー率71% (1325/1856)
回答No.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

saisho_wa_goo
質問者

お礼

おおおおぉーーーーっ!!!!!!! できました!! 20+10pt 付けられないのは何でだぁ?

関連するQ&A