Hi the code below does not work. Complaining about
xsheet.Tab.ColorIndex = i
I did similar idea with cells and everything was fine. Please see the second code. Thank you so much.
Sub mysheets()
Dim xsheet As Worksheet
Dim i As Integer
i = 0
For Each xsheet In Worksheets...