How can you made a Marco add a comment in the active cell, I want a input box to come up an what is typed in it will be put in the comment, I tried is but it want work. I am using '97. Thanks
Sub Add_Comment()
ActiveCell.AddComment
Comment = InputBox("Enter comment here")
ActiveCell.Comment.Visible = False
End Sub
Sub Add_Comment()
ActiveCell.AddComment
Comment = InputBox("Enter comment here")
ActiveCell.Comment.Visible = False
End Sub