I want a macro that will change the color of all tabs within the workbook to one color.
The formula gives me errors:
Sub Color2()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
ws.Activate
With Selection.Tab
.ColorIndex = 6
End With
Next ws
End Sub
The formula gives me errors:
Sub Color2()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
ws.Activate
With Selection.Tab
.ColorIndex = 6
End With
Next ws
End Sub