セルに追加されたコメントを表示した際の図形を操作する方法を紹介します。
コメントの図形を変更する
コメントの図形（下の図）を操作するには、Commentオブジェクトのshapeプロパティを操作します。
shapeプロパティは、次の書式に従い操作します。
対象のセル.Comment.Shape.AutoShapeType = 図形の名前 or 値
図形を変更するサンプルマクロ
Sub コメント図形変更()
Cells(6, 4).Comment.Shape.AutoShapeType = msoShapeCloudCallout
End Sub
このマクロでは、コメントの図形を四角から、雲状の吹き出しに変えています。
変更できる図形の種類
変更可能な図形の種類をいくつか紹介します。
雲状の吹き出し
名前：msoShapeCloudCallout
値 ：108
丸型の吹き出し
名前：msoShapeOvalCallout
値 ：107
吹き出し
名前：msoShapeBalloon
値 ：137
角丸の四角
名前：msoShapeRoundedRectangle
値 ：5
メモ
名前：msoShapeFoldedCorner
値 ：16
爆発
名前：msoShapeExplosion1
値 ：89
波
名前：msoShapeWave
値 ：103
ハート
名前：msoShapeHeart
値 ：21
顔
名前：msoShapeSmileyFace
値 ：17
禁止マーク
名前：msoShapeNoSymbol
値 ：19
コメント