Unlock a world of possibilities! Login now and discover the exclusive benefits awaiting you.
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 ??
Hi,
You mean like this?
set mysheet=ActiveDocument.ActiveSheet
set sp=mysheet.GetProperties
sp.ZoomFactor = sp.ZoomFactor+0.5
mysheet.SetProperties sp
Celambarasan
Hi,
You mean like this?
set mysheet=ActiveDocument.ActiveSheet
set sp=mysheet.GetProperties
sp.ZoomFactor = sp.ZoomFactor+0.5
mysheet.SetProperties sp
Celambarasan
Thanks a lot
Hi
Using the variable you can done it
Regards
Ashok