Add comment and resize it

[jlclyde]

I have code that I am trying to put in a comment and sesize it. I can
not figure out the part how to resize them.
If i.Offset(0, 6).Value = "Realm" Then
Set shp = i.AddComment("")
'Size?????
Else
Exit Sub
End If

Thanks,
Jay

 

[Sheeloo]

See http://www.contextures.com/xlcomments03.html#Resize

 

[Andrew]

Great website.. Sheeloo.. Thanks

"Sheeloo" <="to" & CHAR(95) & "sheeloo" & CHAR(64) &
"hotmail.com"> wrote in message
| See http://www.contextures.com/xlcomments03.html#Resize
|
|
| "jlclyde" wrote:
|
| > I have code that I am trying to put in a comment and
sesize it. I can
| > not figure out the part how to resize them.
| > If i.Offset(0, 6).Value = "Realm" Then
| > Set shp = i.AddComment("")
| > 'Size?????
| > Else
| > Exit Sub
| > End If
| >
| > Thanks,
| > Jay
| >