Este fórum está sendo desativado

[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!!

[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

[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!!