PDA

View Full Version : [SOLVED] Adding comments



blackice
07-06-2005, 12:42 PM
im trying to add a comment after i enter some data, but the formula that im using adds the coment to the bottom cell. pls tell me what im doing wrong.


Private Sub Worksheet_Change(ByVal Target As Range)
ActiveCell.AddComment
ActiveCell.comment.Visible = False
ActiveCell.comment.Text Text:="Price as of:" & Now
End Sub

Bob Phillips
07-06-2005, 01:06 PM
Private Sub Worksheet_Change(ByVal Target As Range)
Target.AddComment
Target.comment.Visible = False
Target.comment.Text Text:="Price as of:" & Now
End Sub