Página 1 de 1

Queria que ao executar o Código2 a Planilha ficasse Bloqueada.

Enviado: 12 Mar 2021 às 17:07
por Inovacao
Pessoal, boa tarde!!

Alguém consegue me explicar qual a diferença entre o primeiro e só segundo código?

Porque ao executar o primeiro código a planilha permanece bloqueada,.
Já ao executar o segundo código a planilha fica desbloqueada, e queria que ficasse bloqueada.

CÓDIGO 1

Sub FILTRAR2()
'
' FILTRAR2 Macro
'
Sheets("Mov_eMPRESA-Salvo").Unprotect "1234"
'
ActiveSheet.Range("$G$4:$AQ$630").AutoFilter Field:=36, Criteria1:= _
"Com Valores"

Sheets("Mov_eMPRESA-Salvo").Protect "1234"
End Sub


CÓDIGO 2

Sub DESFILTRAR2()
'
' DESFILTRAR2 Macro
'
Sheets("Mov_eMPRESA-Salvo").Unprotect "1234"
'
ActiveSheet.Range("$G$4:$AQ$630").AutoFilter Field:=36

Sheets("Mov_Orçamento-Salvo").Protect "1234"

ActiveWorkbook.Save
End Sub


Obrigado!!

Re: Queria que ao executar o Código2 a Planilha ficasse Bloqueada.

Enviado: 15 Mar 2021 às 09:55
por JCabral
A diferença é que no segundo código a planilha que é desprotegida ("Mov_eMPRESA-Salvo").Unprotect não é a mesma que depois é protegida ("Mov_Orçamento-Salvo").Protect

Re: Queria que ao executar o Código2 a Planilha ficasse Bloqueada.

Enviado: 15 Mar 2021 às 10:56
por Inovacao
Bom dia, JCabral!!
Tudo bom?

Na mosca era isso mesmo, bingo!!

Tenho mais dois tópicos em aberto que ninguém conseguiu me ajudar, se voce sentir de me ajudar nestes tambem, fico desde já agradecido.
viewtopic.php?f=9&t=14728

Muito obrigado!!