Pergunta : Começ livrado da cor da aba em todas as abas entre 2 abas

Eu tenho um grupo das abas entre o nome “PE” da aba e “DTP” esse eu quero cancelar a cor de antes que eu funcione o class= " lineNumbers " >
1 do >

Sub codeBody ColorTabs do " prettyprint " " do class= do id= " codeSnippet829932 do >
 " desobstruído " de 

  
  class= > " desobstruído " do 

    soluções >Related 
    class= 
title= da " cor do href= " /Software/Office_Productivity/Office_Suites/MS_Office/Excel/Q_26335572.html " do Change " do class= " da lista " se o nome da aba aparece em list

Resposta : Começ livrado da cor da aba em todas as abas entre 2 abas

'Reparou o erro tipográfico no tabname do término
ClearColors secundário ()
Começo = 0
mydefault = 16
Para cada folha em ActiveWorkbook.Sheets
Se Sheet.Name = “PE” então
  Começo = 1
  mydefault = Sheet.Tab.ColorIndex
ElseIf (começo = 1) então

  Se (Sheet.Name <> “DTP”) então

  Sheet.Tab.ColorIndex = mydefault '(não sure se esta é sua cor da aba do defeito - você pode ter que mudar este número)
 ElseIf Sheet.Name = “DTP” então
  Retirar o submarino
 Terminar se

Terminar se

Em seguida
Submarino da extremidade
Outras soluções  
 
programming4us programming4us