Este fórum está sendo desativado

[Angra]

Boa noite
Tenho um valor já formatado que vai servir de base para orientar outra formatação ou seja essa formatação vai ser o guia dessa segunda formatação. Melhores detalhes no infográfico. Nessa plan tem macros/filtro de funcionamento normal. Preciso apenas da formatação

[babdallas]

Para mim não ficou claro o que quer. Por favor, detalhe a explicação.

[Angra]

Bom dia
Vamos tomar como exemplo o valor 1.
Faço um "x" que é um parâmetro para validar o valor 1 dentro de duas tabelas distintas, por sua vez outros valores 1, são marcados (queimados) ao longo de todas as tabelas, como as listas tem aproximadamente 500 linhas e o espaçamento entre o "x" marcado (entre as 2 tabelas, AM4:AR30) e as tabelas propriamente ditas(B4:D30 e AP4:AR30) ficam "longe da leitura", a formatação dessas posições de 1 (queimados) em AM4:AR30, facilita visualmente identificar que não preciso marcar outro "x" nesse intervalo AM4:AR30, porque aquela posição de 1, já foi marcado anteriormente.

[osvaldomp]

Código: Selecionar todos

...
...
                               Celula.Interior.Color = vbYellow ~~~> PROCURE ESTA LINHA NO SEU CÓDIGO E INSIRA AS 3 LINHAS LOGO ABAIXO DELA
                 '##########
                 If (Target.Column < 42 And Celula.Column >= 80) Or (Target.Column > 41 And Celula.Column <= 4) Then
                  Cells(Celula.Row, Celula.Column + Desloc - 1).Interior.Color = vbRed
                 End If
                '############
...
...
                              Celula.Interior.Color = vbWhite~~~> PROCURE ESTA LINHA NO SEU CÓDIGO E INSIRA AS 3 LINHAS LOGO ABAIXO DELA
                 '##########
                 If (Target.Column < 42 And Celula.Column >= 80) Or (Target.Column > 41 And Celula.Column <= 4) Then
                  Cells(Celula.Row, Celula.Column + Desloc - 1).Interior.Color = vbBlack
                 End If
                '############
...
...

[Angra]

Boa tarde
osvaldomp, devo não ter entendido de como inserir as alterações no change da plan, veja se é isso mesmo, pq aqui deu o seguinte erro:

[osvaldomp]

Editei o meu post anterior e marquei as linhas do seu código que devem servir como referências para você acrescentar as linhas de código que eu sugeri.

[Angra]

Ma qui burrru, da zeru pá êli fêçô Gratíssimo pela ajuda.