Description

Zooms to the selection, with 52pt of border on the Pages main tab.

Syntax

Code

  <ShellCommand(CanExecute:="Ena_IsWindowActive")> _

  Public Sub ViewZoomSel()

    Page.ViewZoomSel(True, 52000)

  End Sub

See also

ViewZoomArticle

ViewZoomIn

ViewZoomLayoutFit

ViewZoomLayoutWidthFit

ViewZoomLazo

ViewZoomOut

ViewZoomPageFit

ViewZoomPageWidthFit

ViewZoomPctDlg

ViewZoomSel