Tab Colour Change

M

MAS

Hi,

I am using the following to change cell colours in a individual cells in a
range but I also want the Tab Colour to change if any of the cells in the
named range are changed. Any ideas on the correct code ?

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

If Not Intersect(Target, Sh.Range("B3:B36")) Is Nothing Then
Target.Interior.ColorIndex = 6

Thanks.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

urgent!!!!!! 3
VBA Code for bacground colors 3
VBA Code to run when any cell is updated 0
Stuck with multi function Part 2 28
macro for Tab colour change 3
Array macro question 4
Trying to run excel vba code when cell value changes from empty to entered value. 1
On Change Event and Intersect 4

Top