no evento ao clicar selecione procedimento do evento, vai abrir o vba e cole a função que te passei entre o privante sub e End sub, algo assim (lembrando que vc deve informar na função os campos que seja obrigatório "seu campo").
Private Sub Meu_Botao_Salvar_Click()
if IsNull(seu campo) Then
MsgBox "Campo(s) Vazio(s)!", vbCritical, "Aviso"
me.seucampo.setfocus
ElseIf IsNull(seu campo1) Then
MsgBox "Campo(s) Vazio(s)!", vbCritical, "Aviso"
me.seucampo1.setfocus
ElseIf IsNull(seu campo2) Then
MsgBox "Campo(s) Vazio(s)!", vbCritical, "Aviso"
me.seucampo2.setfocus
ElseIf IsNull(seu campo3) Then
MsgBox "Campo(s) Vazio(s)!", vbCritical, "Aviso"
me.seucampo3.setfocus
Else
MsgBox "Gravado com sucesso!", vbInformation, "Aviso"
End if
End Sub
mastigado!
.................................................................................
Att. Nois
Se tudo não der certo... tente de novo