Como Faço para que o Registro não salve
se houver algum campo em branco?

sei que devo usar a condição IF.... Then
porem teria que fazer uma para cada campo??

ou tem alguma forma de fazer tudo de uma vez?

abraços

Eu uso assim: no botão de gravar, faço uma checagem dos campos TextBox e ComboBox se não tem algum vazio, chamando uma rotina para isso (ChecaVazios):

 

Private Sub cmdGravar_Click()
  Call ChecaVazios
  If booSemNada = True Then
    MsgBox "Algum campo está sem preencher." & vbCrLf & vbCrLf & "Preencha todos os campos."
    booSemNada = False
    Exit Sub
  End If
  Call AjustaParaGravar --> esta rotina ajusta os tiposde dados dos campos texto
  Call Grava  --> esta rotina faz a gravação no Recordset
End Sub

 

--> booSemNada é uma variável True/False para validar a rotina

Private Sub ChecaVazios()
  For n = Me.Controls.Count - 1 To 0 Step -1
    If Left(Me.Controls(n).Name, 2) = "tx" Then   --> costumo nomear meus textbox sempre começando com tx (txNome, txCidade, etc)
      If Me.Controls(n).Text = "" Then booSemNada = True
    End If
    If Left(Me.Controls(n).Name, 3) = "cbo" Then  --> mesma coisa para nomear as combos
      If Me.Controls(n).Text = "" Or Me.Controls(n).Text = ">> Selecione <<" Then booSemNada = True
    End If
  Next n
End Sub

 

--> também costumo colocar >> Selecione << como texto default em quase todas combos.

 

Adapte ao seu gosto.

 

tem esta função também

 

a função acima verifica se existe um campo vazio e seleciona este alterando sua cor