I've inherited a number of multi-page Visio files and want to get them all to use the same Theme (and variations).



From the Shape Sheet from the 'one I wish to use as a reference' I can see the Page's "ThemeIndex" value (number) etc. But just can't get it/them to properly apply to a 2nd Visio file, via the Page.SetTheme Method in a VBA macro.

PagObj.SetTheme (35) works . It adds the space before the (). Mmm.
PagObj.SetTheme (35,2) gets a compile error; syntax error. This is what I want to use

(Yes I'm new to Visio VBA)

Thanks