Change tab color when a tab is used

I

icestationzbra

you can only do this in office 2002 onwards. this goes into the sheet'
code module.

Private Sub Worksheet_Activate()

Me.Tab.ColorIndex = 3 'this would give "Sheet1" a red underline

End Sub

i tried this, and i dont think it is too useful. as it is, when yo
click on a tab, that tab's name is shown with a white background whil
other tabs are greyed out. with this trick, the active tab shows u
with a white background and a red underline.

maybe someone has a better idea
 
Top