4 Replies Latest reply: Sep 13, 2013 10:29 AM by Taliana Fernandez RSS

Zoom

sumitharsh

This is the macro for Zooming a sheet

 

set mysheet=ActiveDocument.ActiveSheet

set sp=mysheet.GetProperties

sp.ZoomFactor = 1.5

mysheet.SetProperties sp

I want to that if i click on the button Zoom factor should keep on increasing. Say if i click for the first time it should zoom to 1.5 times and if i click second time it should zoom to 2 times. How it can be done ??