The Customize dialog box opens click Close. Click the Assign macro to Toolbars button. It that won't affect the processing of the macro or appear when you use it.Ĥ. What you place here will appear as commented text in the macro code, but it's just information. For Description, you can add any additional explanation that makes sense to you. For Macro name, use PrintCurrentPage as one long word (no spaces) or whatever you'd like to call it.įor Store macro in, All Documents (Normal.dot) is fine.ģ. Print the current page as you normally would as a dry run and to lock in your other normal settings.ġ. Press Ctrl+P to open the print dialog box and set the right printer and settings so all the defaults will be correct. Be sure that the printer settings are the way you’d want them whenever you print a current page. Open a document with multiple pages in Word. I'll create that one again right now and list all the steps for you. Then you can leave the daily cursing at Microsoft to me. Or assign it to both a toolbar button and a keyboard shortcut. If you have a daily need for an easy-access Print Current Page, use the steps I provided previously, but assign the macro to a keyboard shortcut. For practical reasons, and simple code, I'm prepared to print the page using whatever previous settings were in effect, but at least I'm aware of the consequences and wouldn't be surprised to have to cancel the print job if the system advised me to load envelopes into the auxiliary tray.įor most users, the choices aren't so complicated. For my own setup, I might hard-code the command to use the "cheap" paper in tray 2 of my color laser printer, rather than the ultra-bright heavyweight paper in tray 1, or the glossy photo paper in my 6-color wide-format inkjet. It's important to understand that you must have the correct print settings pre-defined and hard-coded as desired. But what about users who have multiple printers, paper trays, media, and the like. For a user with a single printer or simple setup (a desktop inkjet printer, a nearby laser printer, a giant corporate Follow-Me to any printer spooler), such a command looks simple enough to implement. Later idiots crippled the interface with the Ribbon and its pal, the Less-Slow-Access toolbar, where you can place customized macros with icons that all look like little green dots.Īctually, the unexamined life of a "Print Current Page" command is fraught with peril. Unfortunately, I don't know which of the unlimited supply of idiots at Microsoft prevented a simple "Print Current Page" command. "s" & Selection.Information(wdActiveEndSectionNumber) StrCP = "p" & Selection.Information(wdActiveEndAdjustedPageNumber) & _ Selection.GoTo What:=wdGoToPage, Which:=wdGoToFirst, Count:=CurPg, Name:="" If = wdPaneNone ThenĪ = wdNormalViewĪ = wdPrintViewĬurPg = Selection.Information(wdActiveEndPageNumber) It's the one posted by Matt Reid on May 1. On there is a more fulsome macro which worked for me.
0 kommentar(er)
