excel vba - Change sheet's Zoom for inactive page -
as know may change sheet's zoom following code:
activewindow.zoom = 75
is there way change zoom of inactive sheet?
thanks
not beautiful, works.
sub setzoom() mysheet = activesheet.name 'both sheet ids , names work here zoomit = application.inputbox("what's zoom-in-sheet?") 'go sheet (where want zoom in) sheets(zoomit).select 'put in zoom factor (e.g. 300) zoomfactor = application.inputbox("how fi-- er.. zoom?") 'boom! zoomed! activewindow.zoom = zoomfactor 'select old sheet sheets(mysheet).select end sub
sayonara.
Comments
Post a Comment