Página 1 de 1

Proteger/ocultar fórmulas mantendo filtros ativos.

Enviado: 05 Mai 2020 às 01:06
por BITTENCURT
Boa noite

Preciso proteger/ocultar fórmulas da planilha anexa, mantendo as Macros (filtros) ativas.
Já tentei pelo método tradicional, marquei a caixa auto filtro, enfim, fiz o passo a passo e protegeu, porém quando vou usar as Macros/Filtros aparece a mensagem "desproteger planilha".
Existe uma forma de driblar isso?
Se positivo, pode ser usada em outras planilhas ou cada caso é um caso ?

No aguardo

Desde já agradeço.

Bittencurt

Proteger/ocultar fórmulas mantendo filtros ativos.

Enviado: 05 Mai 2020 às 12:10
por AfonsoMira
Boa tarde.

Quais seriam os parâmetros para fazer o filtro?

Re: Proteger/ocultar fórmulas mantendo filtros ativos.

Enviado: 05 Mai 2020 às 12:18
por osvaldomp
Experimente:

Nos dois códigos acrescente a linha em vermelho conforme abaixo.

ActiveSheet.Protect userinterfaceonly:=True
Range("A15:AH15").Select

Re: Proteger/ocultar fórmulas mantendo filtros ativos.

Enviado: 05 Mai 2020 às 13:56
por BITTENCURT
AfonsoMira escreveu:Boa tarde.

Quais seriam os parâmetros para fazer o filtro?
O filtro "Sequencia" sempre aplicar do Menor para o Maior..(A16:A26)

o filtro "Pontuação" para aplicar do Maior para Menor .(W16:W26)

Re: Proteger/ocultar fórmulas mantendo filtros ativos.

Enviado: 05 Mai 2020 às 17:13
por BITTENCURT
Boa Tarde osvaldomp
Acrescentei os código nas duas macros e não funcionou.
Segue planilha protegida (Senha 3344), porém as macros não funcionam.

Re: Proteger/ocultar fórmulas mantendo filtros ativos.

Enviado: 05 Mai 2020 às 17:25
por osvaldomp
BITTENCURT escreveu: Segue planilha protegida (Senha 3344), porém as macros não funcionam.
Verdade, pois só agora você informou que coloca senha ;)
Código: Selecionar todos
 ActiveSheet.Protect "3344", userinterfaceonly:=True

Re: Proteger/ocultar fórmulas mantendo filtros ativos.

Enviado: 05 Mai 2020 às 18:16
por BITTENCURT
Não funcionou..
Será que tem como enviar a planilha alterada com seu código pra testar aqui ?

Posso ter feito algum procedimento errado ...

Proteger/ocultar fórmulas mantendo filtros ativos.

Enviado: 05 Mai 2020 às 19:27
por Kledison
Boa noite,

Verifica se fez a alteração corretamente, aqui funcionou perfeitamente.

Imagem

Re: Proteger/ocultar fórmulas mantendo filtros ativos.

Enviado: 05 Mai 2020 às 20:17
por andriessen
Eu faço assim , começa com
‘Desprotege a Planilha Ativa
ActiveSheet.Unprotect Password:="SUA SENHA"
e termina a macro assim
‘Protege a Planilha Novamente
ActiveSheet.Protect Password:="Sua Senha"

Re: Proteger/ocultar fórmulas mantendo filtros ativos.

Enviado: 05 Mai 2020 às 20:32
por osvaldomp
andriessen escreveu:Eu faço assim , começa com
‘Desprotege ... e termina ...‘Protege
Esse método apresenta um ponto fraco, pois se por alguma razão a execução for interrompida a planilha restará desprotegida, além de requerer o comando adicional para voltar a proteger.

Proteger/ocultar fórmulas mantendo filtros ativos.

Enviado: 05 Mai 2020 às 20:54
por andriessen
obrigado pela dica, nunca pensei nisso. Mas se colocar uma ação em caso de erro () ? funcionária?

Re: Proteger/ocultar fórmulas mantendo filtros ativos.

Enviado: 05 Mai 2020 às 21:04
por osvaldomp
Sim, funcionaria. E nesse caso já serão necessários mais dois comandos: um para captar o erro e indicar o desvio (GoTo) e outro lá no final do código para receber o desvio antes do comando de proteger. E agora já serão quatro comandos em lugar de um. ;)

Re: Proteger/ocultar fórmulas mantendo filtros ativos.

Enviado: 05 Mai 2020 às 22:16
por BITTENCURT
Kledison escreveu:Boa noite,

Verifica se fez a alteração corretamente, aqui funcionou perfeitamente.

Imagem
Kledison

Efetuei alteração como sua Macro, mesmo assim não funcionou...
Poderia me ajudar enviando a planilha funcionando?

Re: Proteger/ocultar fórmulas mantendo filtros ativos.

Enviado: 05 Mai 2020 às 22:43
por Kledison
Boa noite,

eu apenas alterei o código da sua macro de acordo com o que o Osvaldo postou, segue o exemplo.

Att

Re: Proteger/ocultar fórmulas mantendo filtros ativos.

Enviado: 06 Mai 2020 às 00:00
por BITTENCURT
Kledison escreveu:Boa noite,

eu apenas alterei o código da sua macro de acordo com o que o Osvaldo postou, segue o exemplo.

Att
A sua está funcionando, deve ser uma virgula ou ponto ... vou tentar localizar..

daqui a pouco faço os agradecimentos..

Re: Proteger/ocultar fórmulas mantendo filtros ativos.

Enviado: 06 Mai 2020 às 14:26
por BITTENCURT
Boa tarde Kledison
Realmente aquele código funcionou naquela planilha, achei que usando o mesmo código em outras planilhas protegidas com mesma senha iria funcionar, não deu certo.
Protegi uma planilha com seis Macros (Filtros), acrescentei o código nas Macros, fiz todo processo calmamente pra não errar , não consegui.
Você poderia me ajudar ?
Estou enviando a planilha anexa protegida.

No aguardo

Re: Proteger/ocultar fórmulas mantendo filtros ativos.

Enviado: 06 Mai 2020 às 16:13
por osvaldomp
Amigo, no comando que eu sugeri não existe apóstrofo no início a da linha.
Depois o Kledison publicou os códigos, e sem apóstrofo no início da linha.
Em seguida o Kledison disponibilizou um arquivo, e sem apóstrofo no início da linha.

Isso lhe sugere alguma ideia ?

Re: Proteger/ocultar fórmulas mantendo filtros ativos.

Enviado: 06 Mai 2020 às 16:21
por andriessen
apóstrofo no início da linha significa que o que você escrever depois dele e apenas um comentário ou seja, não e uma linha de comandos.

Re: Proteger/ocultar fórmulas mantendo filtros ativos.

Enviado: 06 Mai 2020 às 16:29
por Kledison
Boa tarde!

DELETE o apóstrofo no inicio da linha como foi orientado pelo Osvaldo e Andriessen.

Imagem

Att