Hello,
I use this macro on a button:
Sub ZoomWithErrorCheck
ActiveDocument.GetApplication.WaitForIdle
ActiveDocument.ActiveSheet.FitZoomToWindow
ActiveDocument.GetApplication.WaitForIdle
set asProp=ActiveDocument.ActiveSheet.GetProperties
if asProp.ZoomFactor < 0.5 or asProp.ZoomFactor > 2 then
asProp.ZoomFactor = 1
ActiveDocument.ActiveSheet.SetProperties asProp
else
ActiveDocument.ActiveSheet.ApplyZoomToAllSheets
end if
end sub:
If I open the Application in my Browser everything works fine, but if another user opens it, the macro didn't work.
Are there some options in the Internetexplorer which blocks the macro?
Thanks for help.
Bastian