#1
|
|||
|
|||
Macro for zooming toggle
I'd like to create a button on Word Quick Access bar that will toggle between Zoom 100% and 500%.
Alternatively, I'd like to have 500% as the default value when View>Zoom>Zoom opens, instead of 100%. I found an answer down there for toggling between 100% and 150%, but I need a detailed description of the complete creation process. Thank you so much. |
#2
|
||||
|
||||
The following macro will toggle between 100 and 500%
Code:
Sub ToggleZoom() If ActiveWindow.ActivePane.View.Zoom.Percentage = 100 Then ActiveWindow.ActivePane.View.Zoom.Percentage = 500 Else ActiveWindow.ActivePane.View.Zoom.Percentage = 100 End If End Sub
__________________
Graham Mayor - MS MVP (Word) (2002-2019) Visit my web site for more programming tips and ready made processes www.gmayor.com |
#3
|
||||
|
||||
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
Tags |
macro assign word, togglebutton, zoom scale images |
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
Toggle between upper case, lower case, etc... by one single macro on a Mac, to emulate Shift + F3 on | gloub | Word VBA | 2 | 01-30-2019 12:40 PM |
Word Zooming Macro | The_Iron | Word VBA | 2 | 09-16-2015 02:08 PM |
Macro to toggle outline level | Jennifer Murphy | Word VBA | 3 | 01-22-2014 11:22 PM |
Zooming in a shape | wouter333 | PowerPoint | 2 | 10-15-2013 05:55 AM |
Macro to toggle outline level | Jennifer Murphy | Word VBA | 0 | 07-08-2013 08:20 AM |