|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
vba code to change word zoom level based on Display monitor being Portrait or Landscape mode?
Hi there all of us at work have dual 21 inch widescreen monitors. Some of us prefer to have our second monitor actually be in landscape mode, but some of us physically turn our 2nd monitor so that it is taller rather than wide. we then hit control alt left so that what shows on our screen is also adjusted. Those of use who keep our second monitor wider rather than taller prefer this: Code:
With ActiveDocument.ActiveWindow.View .Type = wdPrintView .Zoom.Percentage = 120 .FullScreen = True End With Code:
With ActiveDocument.ActiveWindow.View .Type = wdPrintView .Zoom.Percentage = 104 .FullScreen = True End With |
#2
|
|||
|
|||
Code:
Sub setFullScreen() If Application.Height > Application.Width Then With ActiveDocument.ActiveWindow.View .Type = wdPrintView .Zoom.Percentage = 104 .FullScreen = True End With Else With ActiveDocument.ActiveWindow.View .Type = wdPrintView .Zoom.Percentage = 120 .FullScreen = True End With End If End Sub |
Thread Tools | |
Display Modes | |
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
Word prints in landscape when portrait is selected | uncledewey | Word | 1 | 02-02-2015 05:45 PM |
Large number of landscape pages within a portrait doc--do I have to textbox by hand every landscape? | mlkmnsgrl | Word | 7 | 01-05-2015 05:19 PM |
Remote mouse buttons change mode unpredictably with external monitor | pjscott | PowerPoint | 0 | 03-15-2013 08:40 PM |
Word 2010 How to use both portrait & Landscape in one document | Hatman11 | Word | 5 | 08-05-2011 01:19 PM |
Portrait & Landscape Headers in Same Word Document | Coast331 | Word | 0 | 10-24-2009 02:39 PM |