How do I animate inside a visio drawing?

[Eng]

Looking to animate valves, cylinders, and change color of line when in use.

 

[Chris Roth [ Visio MVP ]]

- Add a User cell to the page's ShapeSheet, say: User.Tick
- Have various shapes reference that cell, say: Cam!Angle =
ThePage!User.Tick*30deg
- Have some VBA code use a timer object to change the value of User.Tick,
and run DoEvents...

Visio.ActivePage.PageSheet.CellsU("User.Tick").ResultIU = 2

This'll get you started at least. Keep in mind that Visio wasn't intended
for such stuff, but you can get it to work!

--

Hope this helps,

Chris Roth
Visio MVP