How to modify the attribute of UML Class

[Yoshihisa]

Hi, I'm Yoshihisa Matsumoto.

I'd like to know how to modify the attribute of UML Class in Visio2003 by
using VBA macro.
In my programming, I can edit the Class name like

shpObj.Shapes("Name").Text = "CTest"

But, I can't find the way to edit the modifier like "private" or "public".
and the way to add attributes and operations.
Does anyone know how to do it?
thanks,

 

[junethesecond]

generally, properties can be modified,
giving formulas or values to the Cell
properties like a
shape.cell("prop.value").formula=0 .
But some of cells seems not easy to change
without breaking embedded functions,
because the uml class shapes are groups of
3 shapes, calling external addons, and
some of the cells are protected with
guard function or by protection section.