Página 1 de 1

Erro na Formatação Condicional

Enviado: 23 Mai 2021 às 15:33
por caromacedo
Boa tarde,

Possuo uma planilha programada para que uma linha inteira vá de uma planilha para a outra dependendo de uma variável.

Acontece que, todas as planilhas possuem as mesmas formatações condicionais, e toda vez que uma linha passa de uma planilha para a outra, ela cria uma formatação condicional apenas para a linha e "corta" as outras linhas.

É possível visualizar isso no arquivo que coloquei em anexo. Ao fazer a linha toda ir da planilha "Prefeitura" para a planilha "Andamento", na planilha andamento ele pegou a formatação condicional que era =$P:$P e virou =$P$3 e =$P$1:$P$2;$P$4:$P$1048576, por exemplo.

Gostaria que isso não acontecesse, queria que ficasse sempre apenas =$P:$P. Alguém sabe como posso resolver?

Muito obrigada e ótimo domingo!

Re: Erro na Formatação Condicional

Enviado: 23 Mai 2021 às 15:58
por osvaldomp
#
Olá, Carol.
Experimente colar como valores.

No código que está no módulo da planilha Prefeitura substitua esta linha
Código: Selecionar todos
            'Copiar
                .Cells(linha, 1).Resize(, 18).Copy Sheets(NomePlanilha).Cells(UltimaLinha, 1)
#
por estas
Código: Selecionar todos
            'Copiar
                .Cells(linha, 1).Resize(, 18).Copy
                Sheets(NomePlanilha).Cells(UltimaLinha, 1).PasteSpecial xlValues

Re: Erro na Formatação Condicional

Enviado: 23 Mai 2021 às 16:06
por caromacedo
Na verdade, não posso colar apenas como valores porque, as vezes, tenho contas dentro das células, exemplo "=200+600" e gostaria que essas fórmulas fossem junto de uma planilha para outra :(

Re: Erro na Formatação Condicional

Enviado: 23 Mai 2021 às 16:45
por osvaldomp
caromacedo escreveu: 23 Mai 2021 às 16:06 ... gostaria que essas fórmulas fossem junto de uma planilha para outra :(
Vi que na coluna P há fórmulas iguais em todas as planilhas, então em lugar de "levar as fórmulas de uma para outra" bastaria manter as fórmulas na planilha destino. ;)
Ainda, na coluna I também está aplicada Formatação Condicional, então é recomendável colar somente valores.
Veja se é isso. A coluna P não sofrerá qualquer alteração.
Código: Selecionar todos
                .Cells(linha, 1).Resize(, 15).Copy
                Sheets(NomePlanilha).Cells(UltimaLinha, 1).PasteSpecial xlValues
                .Cells(linha, 17).Copy
                Sheets(NomePlanilha).Cells(UltimaLinha, 17).PasteSpecial xlValues

Re: Erro na Formatação Condicional

Enviado: 23 Mai 2021 às 17:51
por caromacedo
Osvaldo, muito obrigada pela sua ajuda!

Acontece que nas colunas M, N e O as vezes possuem contas simples, as quais precisam se manter em fórmula quando passadas de uma planilha para outra.

De fato, faze-las passar apenas como valores, resolve o problema da formatação condicional, porém, quando eu realizo essas contas, elas somem, aparecendo apenas o valor na outra planilha :(

Precisava resolver mantendo a cópia com as fórmulas, pelo menos na coluna M,N e O!

Obrigada!! :)

Re: Erro na Formatação Condicional

Enviado: 23 Mai 2021 às 19:33
por osvaldomp
Entendi.
Veja se assim atende. Cola valores, textos e fórmulas.
Código: Selecionar todos
            'Copiar
                .Cells(linha, 1).Resize(, 18).Copy
                Sheets(NomePlanilha).Cells(UltimaLinha, 1).PasteSpecial xlFormulas
#
obs. o comando Resize(, 18) copia até a coluna R, atualmente sem uso. Se não houver previsão de usar aquela coluna, então pode alterar para ~~~> Resize(, 17)

Re: Erro na Formatação Condicional

Enviado: 24 Mai 2021 às 08:24
por caromacedo
Bom dia, Osvaldo!

Assim funcionou perfeitamente! E quanto a coluna 18, usava ela antes, agora está sem uso mesmo!

Muito obrigada pela sua ajuda!!

Uma ótima semana!! :D