for each sh in Activeworkbook.Worksheets
if sh.tab.colorIndex = 38 then
sh.printout
end if
Next

--
Regards,
Tom Ogilvy


"Steph" wrote:

Hi. Is there a way to print all sheets in a workbook that have a specific
tab color? For instance, color index 38? Thanks!