You can't record a macro that will record the "Current page" setting unless
you also include clicking OK to actually print. This macro (courtesy of Jay
Freedman) will do the job:
Public Sub PrintCurrentPage()
With Dialogs(wdDialogFilePrint)
.Range = wdPrintCurrentPage
.PrintToFile = False
.Execute
End With
End Sub
For installation help, see
http://www.gmayor.com/installing_macro.htm
http://word.mvps.org/FAQs/Customizat...oToToolbar.htm
--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA
Word MVP FAQ site:
http://word.mvps.org
Email cannot be acknowledged; please post all follow-ups to the newsgroup so
all may benefit.
"Trudy" wrote in message
...
I tried this three times. The macro will only record the FilePrint
option,
so clicking on the macro button simply opens the Print dialog box. You
still
have to click current and print.
"Bill Foley" wrote:
You could create a simple macro that prints the current page of the
active
document, assign that macro to a button on your toolbar, then all you
have
to do is to remember to click the right button. If you are interested,
check out the following steps to record a macro that does this.
1. Open Word and a document of your choice.
2. Click the "Tools" menu and select "Macro", "Record New Macro".
3. In the "Macro name" box type "PrintCurrentPage" (without the quotes).
4. Click the "Toolbars" button and a dialog box will appear.
5. Click the item under "Commands" (to the right) and drag it up to an
existing toolbar (you might want to drag it to the right of the
SpellCheck
(ABC) icon so you don't accidentally click the other "Print" icon by
mistake
and end up with printing the entire document). Release your mouse when
you
have it where you want.
6. Click on the regular "Print" icon to select it. Click the "Modify
Selection" button. Click "Copy button image".
7. Click your new button (should have a bunch of text on it). Click the
"Modify Selection" button again and click "Default Style". This changes
the
text to an image.
8. Re-click "Modify Selection" and choose "Paste Button Image".
9. Re-click "Modify Selection" again and choose "Edit Button Image".
10. Choose a color (I chose RED) and click inside the white area of the
paper image and change that color to RED by clicking each pixel. All
this
is doing is making the two images stand out differently so you know
which
one is which.
11. Click "OK" on this dialog box, then "Close" on the next one.
You are now in "Macro Record" mode (you should see a small toolbar with
a
couple of buttons on it) so be careful of these next few steps!
12. Click the "File" menu, select "Print". Click the "Current Page"
option,
then click "OK".
13. Click the small square button to "Stop Recording".
You're done. You now have a button on your toolbar that you can click
to
print out the current page of the active document. Holler back if you
run
into problems.
--
Bill Foley, Microsoft MVP (PowerPoint)
Microsoft Office Specialist Master Instructor - XP
www.pttinc.com
Check out PPT FAQs at: http://www.rdpslides.com/pptfaq/
Check out Word FAQs at: http://word.mvps.org/FAQs/General/index.htm
"Syed Azhar Ali" Syed Azhar wrote in
message
...
In MS Word for printing a current page, one has to go through four
steps:
1)
click 'File', 2) click 'Print', 3) click 'Current Page', 4) 'OK'. If
by
mistake 'Current Page' is checked, all pages in a file go to printer.
The
default printing is for 'All pages', why 'current page' printing is
not
possible as default. I want a shortcut for printing the current page
in
one
go.