Change worksheet tab colors failing

J

John

I'm using the following code to clear the colors from a worksheet tab and am
getting a "Subscript out of range" error:
Sheets("aaaDetail").Range("$A$1").Select
Sheets("aaaDetail").Tab.ColorIndex = xlAutomatic

The first statement selects cell A1 fine, but the second errors.

I appreciate your help, -John
 
J

Joel

from
Sheets("aaaDetail").Tab.ColorIndex = xlAutomatic
to
Sheets("aaaDetail").Tab.ColorIndex = -4142
 

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

Macro Error 1
VBA for Dependents shortcut menu 0
Changing tab color locks the worksheet 3
want to change tab color based on the info in a cell. 5
Code execution is correct but generates Error :The file you aretrying to open is in a different form 3
Conditional Formatting a tab color 3
Return cell(s) Conditional Formatting Status via a macro 3
Search other sheets for numbers & color them 10

Top