Validering af felter eller hele poster

Jeg har lavet en database, hvor jeg gerne vil sikre mig, at et antal felter (nærmere angivet 4 stk.) er udfyldte.

Det jeg ønsker er, at når jeg forlader et felt (eller hele posten)skal der komme en meddelelse, hvis et eller flere ud af 4 udvalgte felter, ikke er udfyldte.

Jeg har prøvet lidt forskelligt:

På tabellens validering har jeg forsøgt med:

[Produkt] or [Fejltype] or [Fejlværdi] or [Antal] is not null
og så en fejlmeddelelse.

Så har jeg forsøgt med valideringsregler ind på hver enkelt felt med:

Is not null
Og så en fejlmeddelelse

Men det virker ikke korrekt på den underformular, der anvender valideringsreglerne.

Så har jeg sat følgende ind på feltet "Ved Udgang" i formularen:

Private Sub Produkt_Exit(Cancel As Integer)

If [Produkt] Is Null Then
MsgBox "Område skal være udfyldt"
Cancel = True

End If

Me.[Fejltype].Requery
Me.[Fejltype] = ""

End Sub

Ovenstående kode skulle jo så på hvert af de fire felter i formularen.

Men den giver en fejl, hvor "If [Produkt] Is Null Then" er markeret med gult i VBA.

Jeg kan bedst lide den sidste løsning, hvor det giver meddelelsesboksen med det samme et af felterne forlades uudfyldt.

Jeg tror ikke, de sidste 2 linier i koden har betydning for valideringen, idet de blot nulstillet det næste felt i formularen, før dette felt udfyldes.