Assign COlors to Sheet Tabs

P

PMO

How do I assign a color using VBA to a sheet Tab. I have looked high
and low without any luck.
 
J

JackD

This is actually the Microsoft project newsgroup, not excel, but since you
asked, this works for me.

Sub foo()
'turn sheet1 tab to red
ActiveWorkbook.Sheets("Sheet1").Tab.ColorIndex = 3
End Sub
 
Top