Zooming an Excel object

[Pipe2Path]

I am trying to zoom an embedded Excel spreadsheet. The following is my code :

xlsApp.activeWindow.zoom=75

This seems to be a read-only property. Is there any way I can zoom a spreadsheet when it is embedded in an OLE container control in VB?

Thanks.

 

[dsi]

Not real sure if this will work, but you may want to try zooming to a selection rather than a percentage. I did this a long time ago and see that I set the Zoom value to True rather than a numerical value.

rng = "A287:I310"

Range(rng).Select

ActiveWindow.Zoom = True

 

[Pipe2Path]

Thanks dsi. That didn't work either. Excel seems to reject the zoom property when run from the outside of the Excel environment. I think I may have to go to the API to look for something... Any other ideas?