Display Zoom and View Layout dialog

Hi folks,

WIN10 LO 6.4.7 HSQL2.51

In order to modify a forms zoom given varying screen resolutions

One can use the zoom slider in the status bar
One can assign keys to zoom in out
One can use ctrl scroll wheel

but how can one pop up the zoom and view layout dialog from a macro once the status bar is hidden?

Thks

Hello,

may be this is what you are looking for:

sub StartZoomDialog

 dim oDoc as object
 dim oDisp as object

 oDoc   = ThisComponent.CurrentController.Frame
 oDisp  = createUnoService("com.sun.star.frame.DispatchHelper")
 oDisp.executeDispatch(oDoc, ".uno:Zoom", "", 0, Array())

end sub

Works for me on:

Version: 7.1.0.2 / LibreOffice Community, Build ID: 53d68d29d90fd16448721a60aad68c28ff0809f5
CPU threads: 8; OS: Linux 5.3; UI render: default; VCL: kf5
Locale: en-US (en_US.UTF-8); UI: en-US, Calc: threaded

Danke Uwe

works like a charm

@anon73440385, Gruss aus Chile, wuerde autostart(restart) auch via uno abgerufen?

@gkick - thank for the greetings.

Can’t find - just like @Ratslinger in his comment to the referenced question - any uno: command at https://wiki.documentfoundation.org/Development/DispatchCommands

@ Opaque Thanks anyway