Remove Color of all Sheets tabs

---

Code:

Sub RemoveColorSheetsTabs()
    Dim mySheet As Worksheet
    For Each mySheet In ActiveWorkbook.Sheets
        mySheet.Tab.ColorIndex = xlColorIndexNone
    Next
End Sub

---