I have written the following scripts:
For I = 1 to 10
Cells(I,1).AddComment
Cells(I, 1).Comment.Text Text:="ABC "
Cells(I, 1).Comment.ShapeRange.ScaleHeight 0.33, msoFalse, msoScaleFromTopLeft
Next I
I want to change the size of the comment box and the size of text inside the comment box but it doesn’t work. Please help. Many Thanks
For I = 1 to 10
Cells(I,1).AddComment
Cells(I, 1).Comment.Text Text:="ABC "
Cells(I, 1).Comment.ShapeRange.ScaleHeight 0.33, msoFalse, msoScaleFromTopLeft
Next I
I want to change the size of the comment box and the size of text inside the comment box but it doesn’t work. Please help. Many Thanks