Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
Validação de Dados
-
- Acabou de chegar
- Mensagens: 2
- Registrado em: Seg Mai 27, 2019 5:32 pm
Validação de Dados
Em uma célula coloquei uma data-inicio. Quero que ela sirva de referência para entrada de informações em outras células quando o usuário for digitar uma data. Ou seja, a regra de validação é: se a data que o usuário digitar for menor que a data da célula F12, bloqueie. Eu não posso colocar uma data fixa, pois vai depender da data que for colocada na célula referência. Trata-se de apontar dados de uma célula não um dado.
Re: Validação de Dados
jairoriele bom dia!
Veja se seria isso e adapte para o seu projeto.
Coloque dentro da TextBox.
Abraço
Private Sub TextBox1_AfterUpdate()
'Se F12 for menor que a data digita...
If Plan1.Range("F12").Value > TextBox1 Then
TextBox1.Enabled = False 'Bloqueia
MsgBox "Erro", vbCritical, "Erro!"
End If
End Sub
Veja se seria isso e adapte para o seu projeto.
Coloque dentro da TextBox.
Abraço
Private Sub TextBox1_AfterUpdate()
'Se F12 for menor que a data digita...
If Plan1.Range("F12").Value > TextBox1 Then
TextBox1.Enabled = False 'Bloqueia
MsgBox "Erro", vbCritical, "Erro!"
End If
End Sub