ちょいちょい作業の邪魔になるので、クイックツールバーに追加しました。
<コード>
Sub コメント表示()
Application.DisplayCommentIndicator = xlCommentAndIndicator
Range("A1").Select
End Sub
Sub コメント非表示()
Application.DisplayCommentIndicator = xlCommentIndicatorOnly
Range("A1").Select
End Sub
ちょいちょい作業の邪魔になるので、クイックツールバーに追加しました。
<コード>
Sub コメント表示()
Application.DisplayCommentIndicator = xlCommentAndIndicator
Range("A1").Select
End Sub
Sub コメント非表示()
Application.DisplayCommentIndicator = xlCommentIndicatorOnly
Range("A1").Select
End Sub