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
Hello,Private Sub BhBp_ZoomIn()Application.ActiveWindow.ActiveView.Zoom = Application.ActiveWindow.ActiveView.Zoom + 1End SubThe code above Zoom in 1% more then currentIf You assign F12 to Sub BhBp_ZoomIn every pressing of F12 will increase Zoom with 1% Greetings!