コメントの挿入 | コメントのユーザー名 |
Sub test1() If Not Range("A3").Comment Is Nothing Then Range("A3").Comment.Text Text:="コメントを変更しました" Else Range("A3").AddComment "新しいコメントです" End If Range("A3").Comment.Visible = True End Sub |
よねさんのExcelとWordの使い方|エクセル2013基本講座:目次|コメント|コメントの挿入