well, Thanks for your reply. However, the file is quite big with more than 25 sheets. I sent one sheet to give an example. Now, the file will be used by many people but everyone would be interested in different sheets. The problem i am facing currently, like you must have seen is, the macro prints only black and white but manually you can print in colour, I would like the macro to print in colour ...
Please see if you could help :) Thanks again, Sunny On Mon, May 14, 2012 at 9:34 PM, dguillett1 <dguille...@gmail.com> wrote: > Based on the file you sent me with ONE sheet with graphs the easiest > way would be to set up an additional printer with ONLY grayscale and call > it bw or whatever and then print to that printer for bw and the other for > color. > > Application.Dialogs(xlDialogPrinterSetup).Show > > Don Guillett > Microsoft MVP Excel > SalesAid Software > dguille...@gmail.com > > *From:* Sunny Kapoor <sunnykapo...@gmail.com> > *Sent:* Monday, May 14, 2012 11:02 AM > *To:* excel-macros@googlegroups.com > *Subject:* $$Excel-Macros$$ Re: Printing sheets in colour using VBA in > ecel > > Hi, > > I have attached the file...Please let me know what should i do... > > Thanks in advance, > Sunny > On Monday, 14 May 2012 16:56:25 UTC+2, Sunny Kapoor wrote: > >> Hi Guys, >> >> I am trting to print sheets in colour using VBA. >> I am using the following code... >> >> ______________________________**__________ >> Sub Print_sheet() >> With ActiveSheet >> >> .PageSetup.BlackAndWhite = False >> >> .PrintOut Copies:=1, Collate:=True >> End With >> >> End Sub >> ______________________________**____________ >> >> >> I have put Buttons on each sheet and assigned this macro to every button. >> The problem is that for some sheets, the macro prints the sheets in colour >> while for some others, it prints them in Black & White. >> >> Ant help would be appreciated... >> Cheers, >> Sunny >> > > On Monday, 14 May 2012 16:56:25 UTC+2, Sunny Kapoor wrote: >> >> Hi Guys, >> >> I am trting to print sheets in colour using VBA. >> I am using the following code... >> >> ______________________________**__________ >> Sub Print_sheet() >> With ActiveSheet >> >> .PageSetup.BlackAndWhite = False >> >> .PrintOut Copies:=1, Collate:=True >> End With >> >> End Sub >> ______________________________**____________ >> >> >> I have put Buttons on each sheet and assigned this macro to every button. >> The problem is that for some sheets, the macro prints the sheets in colour >> while for some others, it prints them in Black & White. >> >> Ant help would be appreciated... >> Cheers, >> Sunny >> > > On Monday, 14 May 2012 16:56:25 UTC+2, Sunny Kapoor wrote: >> >> Hi Guys, >> >> I am trting to print sheets in colour using VBA. >> I am using the following code... >> >> ______________________________**__________ >> Sub Print_sheet() >> With ActiveSheet >> >> .PageSetup.BlackAndWhite = False >> >> .PrintOut Copies:=1, Collate:=True >> End With >> >> End Sub >> ______________________________**____________ >> >> >> I have put Buttons on each sheet and assigned this macro to every button. >> The problem is that for some sheets, the macro prints the sheets in colour >> while for some others, it prints them in Black & White. >> >> Ant help would be appreciated... >> Cheers, >> Sunny >> > -- > FORUM RULES (986+ members already BANNED for violation) > > 1) Use concise, accurate thread titles. Poor thread titles, like Please > Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice > will not get quick attention or may not be answered. > > 2) Don't post a question in the thread of another member. > > 3) Don't post questions regarding breaking or bypassing any security > measure. > > 4) Acknowledge the responses you receive, good or bad. > > 5) Cross-promotion of, or links to, forums competitive to this forum in > signatures are prohibited. > > NOTE : Don't ever post personal or confidential data in a workbook. Forum > owners and members are not responsible for any loss. > > > ------------------------------------------------------------------------------------------------------ > To post to this group, send email to excel-macros@googlegroups.com > > -- > FORUM RULES (986+ members already BANNED for violation) > > 1) Use concise, accurate thread titles. Poor thread titles, like Please > Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice > will not get quick attention or may not be answered. > > 2) Don't post a question in the thread of another member. > > 3) Don't post questions regarding breaking or bypassing any security > measure. > > 4) Acknowledge the responses you receive, good or bad. > > 5) Cross-promotion of, or links to, forums competitive to this forum in > signatures are prohibited. > > NOTE : Don't ever post personal or confidential data in a workbook. Forum > owners and members are not responsible for any loss. > > > ------------------------------------------------------------------------------------------------------ > To post to this group, send email to excel-macros@googlegroups.com > -- It is worth it just to reach for the stars: even if you grab a handful of stardust, you will be happy to have tried. -- FORUM RULES (986+ members already BANNED for violation) 1) Use concise, accurate thread titles. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get quick attention or may not be answered. 2) Don't post a question in the thread of another member. 3) Don't post questions regarding breaking or bypassing any security measure. 4) Acknowledge the responses you receive, good or bad. 5) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited. NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss. ------------------------------------------------------------------------------------------------------ To post to this group, send email to excel-macros@googlegroups.com
