Como Proteger célula no excel após preenchida

Ola Tudo bem?
Sou o Gledson do canal no Youtube Programador Excel VBA,
nesse vídeo ensino como Como Proteger célula no excel após preenchida.

Pra isso trabalhamos com:
evento Worksheet_Change(ByVal Target As Range)
Range
Target.Column
Target.Count
Target.Row
ActiveSheet.Unprotect
ActiveSheet.Protect
Target.Address

ARQUIVO PARA DOWNLOAD NO COMENTÁRIO FIXADO DO VIDEO

Bons estudos,

Att, Gledson Programador Excel VBA

[ProgramadorExcelVBA]

LINK DO ARQUIVO
Bons estudos,


Att, Programador Excel VBA

[emersongoldberg]

Esse vídeo é de 2019 e continua ajudando! Agradeço a excelente explicação e a disponibilização. Ah, eu preferi fazer as linhas no passo a passo, parando o vídeo, retornando para entender o quer estava fazendo e deu super certo, assim não precisei fazer o download do arquivo disponibilizado. Parabéns!!!

[reliquiaserelatos]

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Column <> 1 Or Target.Count > 1 Then Exit Sub
Range("B" & Target.Row) = Now

ActiveSheet.Unprotect
Range(Target.Address).Locked = True
ActiveSheet.Protect

End Sub

[jeferson-jeffexcel]

Rapaz, esse código será muito útil, valeu


Aula top

[rsobral]

Obrigado querido, era exatamente o que eu precisava.

[albanoteles]

Excelente código. Obrigado por partilhar.

[eliterony]

Eu pesquisei muito para fazer uma planilha com essa funcionalidade.

[thaisnunes]

@Programador Excel VBA
Tenho a seguinte estrutura no meu módulo.

Function DataFixa()
DataFixa = Now
End Function
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Not Intersect(Target, Range("D2:D6000")) Is Nothing Then
On Error GoTo 0
With Target
.Value = .Value
End With
End If
End Sub


Estou utilizando para que na coluna D eu tenha o retorno de data e hora fixa que não altere quando eu entrar na pasta ou atualizar.
Porém agora necessito que quando eu digitar nas colunas 1, 2 e 3, elas sejam bloqueados após a edição, como eu já tenho essa estrutura para a data não mudar não sei como conciliar essas informações para o projeto fazer tudo isso.

[pauloamarodelima]

Show de bola, parabéns!
Qual seria a função para eu além de bloquear a coluna A, bloquear também as colunas B e C, após o seu preenchimento?
Eu estaria alterando o preenchimento da coluna B para a D.
Agradeço se puder me ajudar.

[contapilcontabilidade]

Gostaria de fazer esse mesmo procedimento em outras células da mesma planilha e queria proteger era a célula da data e não a digitada.

[PharaoNinja]

Preciso dessa função porém para bloquear somente após salvar a planilha é possivel

[receitandobrasil]

o meu não está bloqueando, utilizei o código mas consigo alterar e apagar a célula

[joelzioprado]

Adorei o vídeo Parabéns gostaria de saber se a célula da coluna A se for validação de dados para escolher alguma coisa vai funcionar mesmo assim

[fillipemachado]

Por favor, poderia me ajudar, seguindo seu raciocínio, como faria para colocar uma senha de liberação para deixar sim eu alterar a célula caso a senha seja digitada?

[estivenleite]

Bom dia, não consigo bloquear as celulas tem um bug no excel, porque quando clico na celulas protegida só as guias de comando fica inativa e a celula ficam editavéis do mesmo jeito

[LeandroMachadodaRosa]

E depois tem como desbloquear a célula? Caso seja digitado por engano.

[raphaelsoares]

Olá, eu consigo fazer essa função no Planilhas do Google?

[rsgames]

E AO CONTRARIO COMO SERIA? TENHO UMA PLANILHA QUE BLOQUEIA A CELULA QUANDO PREENCHIDA MAS NÃO LEMBRO COMO TIRA.

[elieversonguerchigonzales]

Boa noite. Consegui fazer o código e deu certo mas, quando fui fazer com a célula que contém uma lista suspensa não permitiu. Alguém sabe como bloquear a célula com a lista suspensa após a escolha do dado da lista?

[BadBoyGaming]

Como usar isso sem atrapalhar o funcionamento de uma tabela?