Página 1 de 1

VBA para travar célula após preenchida

Enviado: 13 Dez 2018 às 15:35
por Diego100ges
Boa tarde pessoal
Preciso de um VBA que proteja a célula assim que la seja preenchida, para que o dado não seja alterado, porém preciso disso em uma unica coluna, as demais precisam estar liberadas para preenchimento.
Desde já muito obrigado!

VBA para travar célula após preenchida

Enviado: 13 Dez 2018 às 15:44
por werlewow
Utilize esse cód na sua worksheet. Perceba que o cód trava a coluna A, se quiser alterar é só mudar o numero (b=2; c=3 e etc)


Private Sub Worksheet_Change(ByVal Target As Range)
Dim senha As String
senha = "123mudar"


If Target.Column = 1 Then

If Planilha3.ProtectContents = True Then Planilha3.Unprotect senha

Planilha3.Range(Target.Address).Locked = True

If Planilha3.ProtectContents = False Then

Planilha3.Protect senha
End If


End If




End Sub

Re: VBA para travar célula após preenchida

Enviado: 13 Dez 2018 às 15:48
por Diego100ges
Consigo usar isso numa planilha online? Do Google

VBA para travar célula após preenchida

Enviado: 14 Dez 2018 às 07:37
por werlewow
hmm ai ja não sei..