Look at the ShapeSheet section in the ShapeSheet (Window > Show ShapeSheet)
for each shape. You'll see that there are more options in the ShapeSheet
than in the dialogs.
You can get at all these cells like this:
shp.Cells("LockWidth").ResultIU = 1 '1=true, 0=False
shp.Cells("LockWidth").Formula = "TRUE"
Check out shp.CellsSRC( sec, row, col ) as well.
If you don't know the name of a cell, click in another cell, type '=', then
click in the cell you're looking for. You'll see the name of the cell in the
formula bar.
--
Hope this helps,
Chris Roth
Visio MVP
