Color Hundreds of Sheet Tabs in One Step in Different Colors

To Download the  exercise File and Follow along click Here

A picture containing clipart Description automatically generated

 

 

 

Here is the Code

Sub ChangeColors()

Dim WS As Worksheet

Dim IndexColor As Long

IndexColor = 50000

For Each WS In Worksheets

WS.Tab.Color = IndexColor

IndexColor = IndexColor + 50000

Next WS

End Sub

Steps will be posted soon

 

 




Watch the Video

Share This Post
Have your say!
0 0

Leave a Reply

Your email address will not be published. Required fields are marked *

You may use these HTML tags and attributes: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <s> <strike> <strong>

SUBSCRIBE TO OUR EMAILING LIST AND RECEIVE FREE BOOK

Receive my Amazing Textbook “Pivot Tables From Zero To Hero” Totally FREE when you subscribe below to our emailing list.
SUBSCRIBE NOW
close-link