Is there a way to set zoom tool to smaller increments?

ellenelle
over 11 years ago

I'm used to working with a zoom that increases by 10% per click below 100%, and 20% above that. Is there a way to duplicate this? Using a drop-down menu is just too slow.

Thanks,
Ellen

Parents
No Data
Reply
  • 0 over 1 year ago

    Hello,
    Private Sub BhBp_ZoomIn()
    Application.ActiveWindow.ActiveView.Zoom = Application.ActiveWindow.ActiveView.Zoom + 1
    End Sub

    The code above Zoom in 1% more then current

    If You assign F12 to Sub BhBp_ZoomIn every pressing of F12 will increase Zoom with 1% 

    Greetings!

Children
No Data

© Corel Corporation. All rights reserved. The content herein is in the form of a personal web log ("Blog") or forum posting. As such, the views expressed in this site are those of the participants and do not necessarily reflect the views of Corel Corporation, or its affiliates and their respective officers, directors, employees and agents. Terms of Use / Privacy​ ​/ ​Cookies / Terms and Conditions / User Guidelines.