Hallo zusammen,
ich möchte in einem UFo, dass nur Datensätze mit leeren Feldern angezeigt werden.
Ich verwende zur Zeit die Auswahl über Kombifelder nach folgenden Eintag:
Public Sub Auswahl01()
Dim strkrit As String
If Not IsNull(Forms!HFo!LfdKundenNr) Then strkrit = strkrit & " and [LfdKundenNr] =" & Forms!HFo!LfdKundenNr
If Len(strkrit) > 0 Then strkrit = Mid(strkrit, 6)
Forms!For_Hfo!For_UFo_1.Form.Filter = strkrit
Forms!For_Hfo!For_UFo_1.Form.FilterOn = True
End Sub
das klappt gut.
Aber bei der Suche nach leerer Kunden-Nr.:
If Not IsNull(Forms!HFo!LfdKundenNr) Then strkrit = strkrit & " and [LfdKundenNr] =" & Null
klappt es nicht.
Erbitte Unterstützung
Hallo,
so:
If Not IsNull(Forms!HFo!LfdKundenNr) Then strkrit = strkrit & " and [LfdKundenNr] Is Null"