From: Magster on
Hi,

I discovered something interesting that I hope you can help me to easily fix.

My default printer doesn't print color - strictly black ink only. I
designed reports in Access 2007 with the Default Printer selected in Page
Setup.

When I needed to see a color version of a report, I selected a color printer
from my network - no problems.

I installed a copy of my app on another user's PC who happens to have a
default color printer and when they tried to print the report using their
default printer - it printed without color! If they selected their printer
off of the network list, it printed color.

I changed my default printer to a color printer from the network, and when I
tried to print the report on my new "default" printer, it too printed in
black.

Then I selected a color printer for my default printer in Windows, created a
quick report using the default setting, and printed via the default and it
printed in color. Now I know what happened, but...

Other than doing a lot of cutting and pasting and recreating my reports with
a color default printer, is there any other way to do this? Either VBA in a
one time fix and saving or some setting in the report that I am unaware of.

I don't imagine there are many folks defaulting to a black ink printer
anymore.

Thanks in advance to anyone who responds.

From: Michael J. Strickland on
"Magster" <Magster(a)discussions.microsoft.com> wrote in message
news:2CBBF2D7-CE6A-4C1B-8B7E-77D88A6E100B(a)microsoft.com...
> Hi,
>
> I discovered something interesting that I hope you can help me to
> easily fix.
>
> My default printer doesn't print color - strictly black ink only. I
> designed reports in Access 2007 with the Default Printer selected in
> Page
> Setup.
>
> When I needed to see a color version of a report, I selected a color
> printer
> from my network - no problems.
>
> I installed a copy of my app on another user's PC who happens to have
> a
> default color printer and when they tried to print the report using
> their
> default printer - it printed without color! If they selected their
> printer
> off of the network list, it printed color.
>
> I changed my default printer to a color printer from the network, and
> when I
> tried to print the report on my new "default" printer, it too printed
> in
> black.
>
> Then I selected a color printer for my default printer in Windows,
> created a
> quick report using the default setting, and printed via the default
> and it
> printed in color. Now I know what happened, but...
>
> Other than doing a lot of cutting and pasting and recreating my
> reports with
> a color default printer, is there any other way to do this? Either
> VBA in a
> one time fix and saving or some setting in the report that I am
> unaware of.
>
> I don't imagine there are many folks defaulting to a black ink printer
> anymore.
>
> Thanks in advance to anyone who responds.
>


Possibly the color printers you are using are set to monochrome by
default, but when you create a default report it sets the color setting
to color.

Try adding this line to your code:

rpt.Printer.ColorMode = acPRCMColor ' 2

where "rpt" is your report object.

These are the two color constants:
acPRCMColor (=2) The printer should print in color.
acPRCMMonochrome (=1) The printer should print in monochrome.



--
Mike

-----------------------------------------------------------------------
Michael J. Strickland
Quality Services qualityservices2(a)verizon.net
703-560-7380
-----------------------------------------------------------------------