Para proteger células no Excel com VBA, você precisa seguir estas etapas:
Abra o Excel e clique na aba "Desenvolvedor".
Clique em "Visual Basic" na seção "Código".
Na janela do Editor do VBA, clique em "Inserir" e selecione "Módulo".
No módulo em branco, insira este código:
Sub ProtegerCelulas()
'Definir senha senha = "senha" 'Proteger células ActiveSheet.Unprotect senha Range("A1:A5").Locked = True Range("C1:C5").Locked = True ActiveSheet.Protect senha
End Sub
Altere "senha" para a senha que você deseja usar. Isso protegerá as células.
Edite a linha "Range" para incluir as células que você deseja proteger. Neste exemplo, "A1:A5" e "C1:C5" são protegidos.
Selecione "Ferramentas" no menu e escolha "Referências".
Marque a caixa de seleção "Microsoft Excel Object Library" e clique em "OK".
Salve o arquivo e execute a macro clicando em "Executar" ou pressionando F5.
As células selecionadas agora estão protegidas. Para desproteger as células, execute esta macro:
Sub DesprotegerCelulas()
'Definir senha senha = "senha" 'Desproteger células ActiveSheet.Unprotect senha Range("A1:A5").Locked = False Range("C1:C5").Locked = False ActiveSheet.Protect senha
End Sub
Lembre-se de alterar "senha" para a senha que você usou para proteger as células. Isso desprotegerá as células selecionadas.