Mrrrr's Forum (VIEW ONLY)
Un forum care ofera solutii pentru unele probleme legate in general de PC. Pe langa solutii, aici puteti gasi si alte lucruri interesante // A forum that offers solutions to some PC related issues. Besides these, here you can find more interesting stuff.
|
Nou pe simpatie:
lovely_pink
 | Femeie
24 ani
Bucuresti
cauta Barbat
26 - 49 ani |
|
|
Mrrrr's Forum (VIEW ONLY)ReguliInregistrareLoginPozeNu sunteti logat. Lista Forumurilor Pe Tematici
|
| #1 |
TRaPModerator
Postari: 964
|
|
NOTE:
This applies to the current Section in the word document (the Section where your mouse cursor is located in).
If you have multiple sections it will only commute between landscape and portrait in the current section.
1. Open Word (create a new word document)
2. Press ALT+F11 to open the Visual Basic editor, where under Normal project you create a new Module, and name it Toggle_Portrait_Landscape:
3. Copy and paste the following code into the new module, then save Normal.dotm and exit Visual Basic Editor:
Sub PortraitLanscape()
If Selection.PageSetup.Orientation = wdOrientPortrait Then
Selection.PageSetup.Orientation = wdOrientLandscape
Else
Selection.PageSetup.Orientation = wdOrientPortrait
End If
End Sub |
4. Add the macro to your Quick Access Toolbar, rename it, pick an icon and confirm your choices (OK, OK).
5. Now go from Portrait to Landscape in just 1 click:
|
|
| |
|
| #2 |
|
|
Or you can make separate buttons for each:
Module 1 - Portrait orientation:
Sub Portrait()
Selection.PageSetup.Orientation = wdOrientPortrait
End Sub |
Module 2 - Landscape orientation:
Sub Landscape()
Selection.PageSetup.Orientation = wdOrientLandscape
End Sub |
_______________________________________
|
|
| |
|
