Boa noite!!
Somente essas informações não basta, o que significa "campos obrigatórios", isso está em um formulário ou em células?
Mande um anexo compactado, com muita informação!!!!!!!
caso contrario tente adaptar.
é só um exemplo que tenho guardado, não tem muita relação com que precisa, afinal precisamos de mais informação.
Private Sub Worksheet_Change(ByVal Target As Range)
'Bloquear células com certa condição
If Target.Column <> 1 Then Exit Sub
If Target.Count > 1 Then Exit Sub
If Target.Value = "BLOQ" Then
Me.Unprotect
Cells(Target.Row, 10).Locked = True
Me.Protect
End If
End Sub
Att
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Postado : 10/04/2012 6:53 pm