Tempo de leitura: 1 minuto
Abas Planilha abas Excel vba cores selecionar
Procedimentos do Aplicativo Microsoft Excel VBA(Visual Basic Application), insere cores nas abas de planilhas, atendendo aos eventos por nós escolhidos, cor nas abas em amarelo e Vermelho. Quando você criar uma folha de planilha que nunca recebeu modificação nenhuma a cor será Amarelo(6), se modificar alguma coisa nas células em qualquer folha de planilha a folha de planilha ficará na cor Vermelho(3)
Esse exemplo de planilha faz parte do MÓDULO COMO FAZER – Programação Microsoft Excel VBA_5 – SaberExcel.
Em Nossas vídeo aulas ensino como distribuir dados para todas as abas de planilhas correspondentes de um determinado campo de um banco de dados como também fazer a consolidação de dados, isto é reunir todos os dados de todas as folhas de planilhas em uma só planilha.
Abas de Planilha em Amarelo – planilhas que nunca recebeu uma alteração
Abas de Planilha em Vermelho – qdo modificar algo em alguma célula na folha de planiha
Observe que os procedimentos estão inseridos no Módulo Workbook,
isto afetará todas as folhas de planilhas à execução dos dois eventos,
Ativacte(amarelo) Change ‘Digitar’ (Vermelho),
então, abas vermelhas porque foi digitado algo
‘//=================’
Aba de Planilha em Amarelo – planilhas que nunca recebeu uma visita
Aba de Planilha em Vermelho – qdo modificar algo em alguma célula na folha de planiha
Quando você inserir uma nova folha de planilha, a aba será de cor amarelo(cor(6))
quando digitar algo na folha folha de planilha a aba ficará vermelho
Observe que os procedimentos estão inseridos no Módulo Workbook,
isto afetará todas as folhas de planilhas à execução dos dois eventos,
Ativate(amarelo) Change’Digitar'(Vermelho),
então, abas vermelhas porque foi digitado algo.
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If Sh.Tab.ColorIndex <> 3 Then Sh.Tab.ColorIndex = 6
End Sub
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Sh.Tab.ColorIndex = 3
End Sub
Excel planilha vba abas cores selecionar
