Posted to microsoft.public.excel.programming

MikeF[_2_] MikeF[_2_] is offline

external usenet poster

Posts: 173

print no shading on selected sheets

The following macro negates shading for printing.
But it only works for one sheet.
If I select more than one page, it only works on the last page.

How can I get this to work for all selected pages, either contigous or
non-contiguous?
*** A loop doesn't work, it throws the page numbering off, and has other
issues.
Thanx,
- Mike

ActiveSheet.PageSetup.BlackAndWhite = True
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
ActiveSheet.PageSetup.BlackAndWhite = False

Reply With Quote

Thread Tools	Search this Thread
Show Printable Version	Search this Thread: Advanced Search
Display Modes
Switch to Linear Mode Switch to Hybrid Mode Threaded Mode

Posting Rules
Smilies are On [IMG] code is On HTML code is Off Trackbacks are On Pingbacks are On Refbacks are On

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Print a selected number of sheets	RobN[_3_]	Excel Discussion (Misc queries)	9	June 8th 07 12:28 PM
How to print a selected number of sheets?	Rafat	Excel Worksheet Functions	0	June 9th 06 02:50 PM
Print selected sheets in Excel	M H	Excel Programming	0	January 4th 05 05:18 PM
Print selected sheets in Excel	M H	Excel Programming	0	January 4th 05 04:48 PM
Print selected sheets in Excel	M H	Excel Programming	0	January 4th 05 03:37 AM

All times are GMT +1. The time now is 08:54 AM.

About Us

"It's about Microsoft Excel"

Menu

About Us