Fråga : Få rid av flik färgar på alla flikar mellan 2 flikar

Jag har en grupp av flikar mellan känd ”PE” för fliken, och ”den DTP” jag önskar att göra klar färga från, för jag kör för class=" codeSnippet " för following

1 för >Sub ColorTabs " för prettyprint " för class= för id= " codeSnippet829932 " för >
Related lösningar för class= ": title= " ändringsflik för Changefliken färgar, om den kända fliken visas i list

Svar : Få rid av flik färgar på alla flikar mellan 2 flikar

'Fixad typo på sinande tabname
UnderClearColors ()
Start = 0
mydefault = 16
För varje täcka i ActiveWorkbook.Sheets
Om Sheet.Name = ”PE” därefter
  Start = 1
  mydefault = Sheet.Tab.ColorIndex
ElseIf (start = 1) därefter

  Om (Sheet.Name <> ”DTP”) därefter

  Sheet.Tab.ColorIndex = mydefault '(inte sure, om denna är din standardflik färgar - du kan måste att ändra denna numrerar),
 ElseIf Sheet.Name = ”DTP” därefter
  Gå ut suben
 Avsluta om

Avsluta om

Därefter
Avsluta suben
Andra lösningar  
 
programming4us programming4us