topic Fit Zoom To Window in QlikView

Fit Zoom To Window

mparker123 — Wed, 25 Nov 2020 16:16:04 GMT

Hello All,

I am having trouble setting up a button that when you click it, it will automatically Fit Zoom To Window. Many people in my company have different size monitors so it is something I would like to do. Again I want people to be able to click on a button that will Fit to zoom for them. I don't want it to be on Reload or Open unless this is the only way it can be done.

Attached is a photo of the Button, Button Properties window, and Edit Module window. These windows contain my macros and my expressions.

Re: Fit Zoom To Window

Frank_Hartmann — Tue, 01 Aug 2017 15:26:24 GMT

Try like that:

Sub FitZoom()
ActiveDocument.ActiveSheet.FitZoomToWindow
End Sub

hope this helps

Re: Fit Zoom To Window

mparker123 — Tue, 01 Aug 2017 15:33:35 GMT

I did that now when i click on the button it loads the "Edit Module window; does not fit to zoom.

Re: Fit Zoom To Window

Anil_Babu_Samineni — Tue, 01 Aug 2017 15:42:03 GMT

Try this?

Sub Zoom

ActiveDocument.GetApplication.WaitForIdle

ActiveDocument.ActiveSheet.FItZoomToWindow

End Sub

Re: Fit Zoom To Window

el_aprendiz111 — Tue, 01 Aug 2017 15:47:36 GMT

Hi,

Sub ZoomIn '-

set mysheet=ActiveDocument.ActiveSheet

set sp=mysheet.GetProperties

sp.ZoomFactor = sp.ZoomFactor-0.15

mysheet.SetProperties sp

End Sub

Sub ZoomOut '+

set mysheet=ActiveDocument.ActiveSheet

set sp=mysheet.GetProperties

sp.ZoomFactor = sp.ZoomFactor+0.15

mysheet.SetProperties sp

End Sub