View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
BRC[_3_] BRC[_3_] is offline
external usenet poster
 
Posts: 3
Default want to change tab color based on the info in a cell.

I am trying to automate somre tracking on a multiple tab worksheet. so that
when a value in cell X is = X it changes the tab to green to show its done.

Sub Tab_color_change()
'
' Tab_color_change Macro
' Macro recorded 8/12/2008 by BRC
'

'
Sheets("Test log ").Select
If t39 = 10 Then
ActiveWorkbook.Sheets("Test log ").Tab.ColorIndex = 4
Else
ActiveWorkbook.Sheets("Test log ").Tab.ColorIndex = 3
End If
End Sub

it runs no errors but it doesn't matter whats in cell T39 it turns the tab
red.