Add a comment to a shape using VBA

[Ryan]

Is there any way to add the mouseover comment to a shape using vba code. I know you can do it through Insert -> Comment, but is there any VBA shape property for the comment field? Thanks
Rya

 

[Bill K. [MSFT]]

Either of these methods will work:
myShape.CellsSRC(visSectionObject, visRowMisc, visComment).Formula = """My
Comment"""
myShape.CellsU("comment").Formula = """My Comment"""

--
Bill K.
Microsoft Corporation

This posting is provided "AS IS" with no warranties, and confers no rights.

Is there any way to add the mouseover comment to a shape using vba code.

I know you can do it through Insert -> Comment, but is there any VBA shape
property for the comment field? Thanks,

 

[John Marshall, MVP]

(Answered elsewhere)

With Visio 2003 you can run the macro recorder to generate VBA code.

John... Visio MVP

Need stencils or ideas? http://www.mvps.org/visio/3rdparty.htm
Need VBA examples? http://www.mvps.org/visio/VBA.htm
Common Visio Questions http://www.mvps.org/visio/common_questions.htm

Is there any way to add the mouseover comment to a shape using vba code.

I know you can do it through Insert -> Comment, but is there any VBA shape
property for the comment field? Thanks,