--
Hope this helps.
Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.
Doug Robbins - Word MVP, originally posted via msnews.microsoft.com
"Frank A." <nomor...@spam.com> wrote in message
news:op.u5y1i0i2ry49an@----------.wp.shawcable.net...
--
Enjoy,
Tony
"Frank A." <nomor...@spam.com> wrote in message
news:op.u5y1i0i2ry49an@----------.wp.shawcable.net...
Lol...that worked rather well. I wonder why they don't just put that in
the View menu like its been for years? Also with Word 2007 there isn't
that idiotic Message Box that used to appear and ruin Full Screen view.
Wonderful.
Its almost full screen except for a menu bar at the top. Except that now
it only takes up about 1/3 of my screen width. Is there any way of making
it "fit to width"? With the world trying to migrate away from paper and
all the waste it entails, you'd think they'd display it with more
practicality. Its as if 99% of the world still prints everything and the
view is supposed to exactly replicate the printed page. Its such hard
work dragging these dinosaurs out of the 20th century with their reams of
paper printed pointlessly, printing photos instead of investing in a
decent monitor, etc. End of rant....:)
'Macro for switching to Full Screen view in Word
Private iZoom As Integer
Sub FullScreenView()
With ActiveWindow
If .View.FullScreen = True Then
.View.FullScreen = False
If iZoom > 10 Then
.View.Zoom = iZoom
End If
Else
.View.FullScreen = True
iZoom = .View.Zoom
.View.Zoom.PageFit = wdPageFitTextFit
End If
End With
End Sub
Note you need to press Esc to close the Full Screen view. However, if you
use ESC your Zoom setting will remain the same as it was when you switched
to Full Screen. You may want to assign a keyboard shortcut to the macro so
you can run the same macro to toggle between Full Screen and your previous
view along with the Zoom setting.
If you don't know how to use the macro provided in the post:
- Copy the lines/code between Sub FullScreenView and End Sub
- In Word, on the View tab, click the Macros button. (If you click the arrow
below Macros, click View Macros)
- In the Macro Name text box type: FullScreenView (Make sure you do not
include spaces)
- Make sure the "Macros in" list reflects "All active templates and
documents"
- Click "Create"
- The Visual Basic for Applications (VBA) Editor will open. Paste the
previously copied code between Sub FullScreenView and End Sub
- Copy the first line: Private iZoom As Integer from this post
- In the VBA Editor, place your insertion point at the top of the module
(the white page that contains your macro) and paste the copied line. (Note
if you see Option Explicit at the top then paste the line below it.)
- Click the Save button to save your changes.
- Click the Close button in the upper right corner to close the VBA Editor.
To assign a keyboard shortcut:
- Right-click your Quick Access Toolbar (QAT) and then click "Customize QAT"
- Location the option for Keyboard shortcuts near the bottom and then click
"Customize"
- In the Categories list, select Macros (near the bottom of the list)
- Select the FullScreenView macro on the right
- In the "Press new keyboard shortcut" text box, press your desired keyboard
shortcut on the keyboard. For example if you want to use Ctrl+Alt+S then
just press those keys on the keyboard.
- Click Assign.
- Click Close to close the Customize Keyboard Shortcut dialog box.
If you also want to add the macro to the Quick Access Toolbar, the don't
close the Options dialog box and use these steps:
- From the "Choose Commands From" list, select "Macros"
- Select the FullScreenView macro and then click Add to add it to your QAT.
- After it's been added you can use the Move Up/Move Down buttons on the
right to change its order or use the Modify button near the bottom to assign
a different icon and change the ScreenTip text.
When you are finished, close the Options dialog box.
~Beth Melton
Microsoft Office MVP
"Frank A." <nomor...@spam.com> wrote in message
news:op.u5y1i0i2ry49an@----------.wp.shawcable.net...
--
Hope this helps,
Doug Robbins - Word MVP
Please reply only to the newsgroups unless you wish to obtain my services on
a paid professional basis.
"Frank A." <nomor...@spam.com> wrote in message
news:op.u5y85fr9ry49an@----------.wp.shawcable.net...
OK - so much for that. Looks like I'll just toggle Full Screen (Alt_V_U)
back and forth. Its a good, efficient and practical solution. Hurrah for
Usenet! :) Thanks people. We would all be less productive without you.
But I'm glad to hear you found something that works for you. :-)
~Beth Melton
Microsoft Office MVP
"Frank A." <nomor...@spam.com> wrote in message
news:op.u500qfihry49an@----------.wp.shawcable.net...