Worked it out:
..BlackandWhite = True

"Corey" wrote in message ...
I have the:
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Preview:=True, Collate:=True

But is there a line i can add to set the printer to print only in Black and White?

Corey....