
Excel VBAでセルのコメントの文字を変更する方法を記録します。
セルのコメントの文字を変更する場合は「Comment」オブジェクトの「Text」メソッドを使います。
< スポンサーリンク >
書き方
Rangeオブジェクト.Comment.Text Text:=”コメント文字”, Start:=開始文字位置, Overwrite:=True or False
※Start,Overwriteは省略可能
コメント内容を変更する
コメントの内容を全て入れ替える場合は、「Start」「Overwrite」を省略し、「Text:=」を書かなくてもOKです。
次のように書き込んでみます。
Sub test()
Range(“A2”).Comment.Text “かきくけこ”
End Sub
元のコメントの前に文字を足したい場合は、「Overwrite」をFalseにします。
この場合「Text:=」も書かないと動作しません。
Sub test()
Range(“A2″).Comment.Text Text:=”サシスセソ”, Overwrite:=False
End Sub
元のコメントの間に文字を足したい場合は、「Start」を数値で指定し、「Overwrite」をFalseにします。
元の文字の3文字目から文字を足したい場合は次のように書きます。
Sub test()
Range(“A2″).Comment.Text Text:=”サシスセソ”, Start:=3, Overwrite:=False
End Sub
元のコメントの3文字目から入れ替えたい場合は、「Start」を数値で指定し、「Overwrite」を省略します。
Sub test()
Range(“A2″).Comment.Text Text:=”サシスセソ”, Start:=3
End Sub
こんな記事も書いています