Page properties

[Chingolo]

Hi,
how can I set the properties of page configuring, to modify the size of
shape's shadow.

Thanks,

 

[John Marshall, MVP]

Try something like:

Application.ActivePage.PageSheet.CellsSRC(visSectionObject, visRowPage,
visPageShdwOffsetX).FormulaU = "5 mm"
Application.ActivePage.PageSheet.CellsSRC(visSectionObject, visRowPage,
visPageShdwOffsetY).FormulaU = "-5 mm"
Application.ActivePage.PageSheet.CellsSRC(visSectionObject, visRowPage,
visPageShdwType).FormulaU = "1"

For those with Visio 2003, the macro recorder is a handy way to determine
how to do manual activities in code. For those without Visio 2003, this may
be a good reason to upgrade.

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