G
Guest
Can anyone tell me why the following code line would give a "Compile error: wrong number of arguments or invalid property assignment"
TodaysDate = Date
ActiveCell.Select
ActiveCell.AddComment
ActiveCell.Comment.Visible = False
ActiveCell.Comment.Text Text:="(" & Format(TodaysDate, "m/d", 0, 0) & ") : Issue Opened"
ActiveCell.Comment.Shape.ScaleWidth 2.2, msoFalse, msoScaleFromTopLeft
ActiveCell.Comment.Shape.ScaleHeight 3.03, msoFalse, msoScaleFromTopLeft
TodaysDate = Date
ActiveCell.Select
ActiveCell.AddComment
ActiveCell.Comment.Visible = False
ActiveCell.Comment.Text Text:="(" & Format(TodaysDate, "m/d", 0, 0) & ") : Issue Opened"
ActiveCell.Comment.Shape.ScaleWidth 2.2, msoFalse, msoScaleFromTopLeft
ActiveCell.Comment.Shape.ScaleHeight 3.03, msoFalse, msoScaleFromTopLeft