Visio Zoom
Hi,
I have a visio drawing for which the shape sheet is 340 inches while the entire drawing consumes 1500 inches. (height 35 inches). Why 340 inches is that if i give shape sheet with more than 340 i wont be getting a 100% zoom with the drawing. So currently i can zoom upto 100%.The image has around 6200 shapes including the dynamic connectors.
The problem occurs when, using a custom macro, i select a shape object within the entire image and try to zoom into it (something like a search). Within a specific region from the shape sheet (both left and right) i dont have any problem, but after this range my code doesnt seem to work.
Visio.Application.ActiveWindow.DeselectAll
Visio.Application.ActiveWindow.Zoom = 0.01 'Change zoom to lower value
Visio.Application.ActiveWindow.Select ActivePage.Shapes(MYSHAPENAME), visDeselectAll + visSelect
Visio.Application.ActiveWindow.Zoom = 1.0 'Reset zoom so that shape gets to center screen
any possible explanation for this effect? and any way i can overcome this issue? please help me out.
NB: my findings are that :1. zoom is inversely proportional to shape sheet width of the page and2. Search area is directly proportional to shape sheet width of that page.
