[Resolvido]Campo requerido subformulário

Boa noite.

Alguém possui algum código ou auxílio que exiba a mensagem de que o campo é de preenchimento obrigatório em um subformulário, e que isso ocorra quando eu clicar em salvar no formulário principal?

Agradeço!

Bom dia...Wltsilva.

Adapte esse código no teu botão salvar.

Acrescente este código no botão salvar.

On Error Resume Next
If IsNull(forms!nomedosubformulário!camposubformulario)= "" Then
MsgBox "Falta Digitar o campo tal.... ", vbExclamation, "Aviso"
forms!nomedosubformulário!camposubformulario.SetFocus
Exit Sub
End If


Teste e nos informe.

PS. não testei !

Muito obrigado.

Então Silvio, adaptei pro meu projeto a mensagem funciona perfeitamente, porém meu subformulário é contínuo e sempre que crio uma linha é adicionada uma nova linha em branco, não sei se isso influência, mas mesmo quando eu preencho o campo aparece a mensagem do campo em questão.

Wellington boa tarde.

Por gentileza, poste parte do teu projeto para que eu possa dar um olhada nele.

Zipa e manda aqui.

Abraços.

Obrigado Silvio.

Segue: http://dl.dropbox.com/u/81000360/Database%20vendas.rar

Nada?

Bom dia Wellington.

Estava de férias com a família, estou com o teu projeto aqui. Te respondo ainda hoje.

Abraços.

Silvio

Veja se é isso que você precisa.

Os demais comandos, como excluir, novo, etc..etc..deixo por sua conta.

A parte de ajuste de layout ( cores, formatos, etc..etc..) deixo por sua conta também.

Abraços.

Tudo certo. Tinha esquecido de finalizar!

Mais uma vez obrigado.