Fråga : Ändringsfliken färgar, om den kända fliken visas listar in

Denna är kodifiera som jag måste att ändra färga av en flik, om den visas i en lista, det fungerar fint för enkla räkneark var flikarna namnges a, b, c, D och The Like, men jag har en arbetsbok var fliken innehåller en numrera i parenteser, efter värdera, som ska, har varit i lista (fliken ska looken lik 123z4567-1 (1) och, som värderar i den ska lista, är 123z4567-1).  Jag önskar endast den färgade fliken, om den verkar som om i denna listar, någon hjälp du kan erbjuda? för class=" codeSnippet " för

1 för >Sub ColorTabs " för prettyprint " för class= för id= " codeSnippet820703 " för >

Related lösningar för class= ": " title=, " för Get rid av flik färgar på alla flikar mellan 2 tabs

Svar : Ändringsfliken färgar, om den kända fliken visas listar in

UnderColorTabs ()
Dunkla TabName som stränger

x = 1

'Täcker (”Pending lista”). Aktivera
Gör till celler (x, 1). Värdera = "",

  TabName = celler (x, 1). Värdera

För varje täcka i ActiveWorkbook.Sheets
Om InStr (Sheet.Name, TabName) därefter
 Sheet.Tab.ColorIndex = 4
Avsluta om
Därefter

  x = x + 1
 
Kretsa
Avsluta suben


'att vara avkräva