Abfrage bringt nicht die richtigen Werte
Greiff
Gesendet: 03.12.14 23:29
Betreff: RE: Abfrage bringt nicht die richtigen Werte


Veteran

Beiträge: 229
10010025
Ort: Badendorf
Hallo,
wenn als Filterkriterium Wie "*" & [Formulare]![qbf_sammlung]![farbe] & "*" Oder Ist Null angibst kommen logischerweise auch die ohne Farbangabe. Wenn Du das nicht willst muss der Teil "oder ist NULL" weg.

Es gibt eine andere Alternative ganz ohne Abfrage:
Du setzt ein ungebundenes Feld über die Farbspalte und nennst es "Selectname" (oder wie Du es im entsprechenden VBA Script nennen willst.
Dann hinterlegst Du im Formular bei den Ereignissen dieses Feldes unter "bei Änderung" folgendes VBA Script.
Private Sub SelectName_Change()
Dim txt As String
Dim SelectName As String
Dim intStart As Integer
txt = Me!SelectName.Text

intStart = Me!SelectName.SelStart 'Cursorposition

If Not Len(txt) = 0 Then
Me.Filter = "Farbe LIKE '*" & txt & "*'"
Me.FilterOn = True

If (Me.RecordsetClone.RecordCount) > 0 Then
Me!SelectName.SelStart = intStart 'Cursor an richtige Stelle setzen
End If
Me!SelectName.SetFocus
Else
Me.Filter = ""
Me.FilterOn = False
Me!SelectName.SetFocus
End If
End Sub

Das Feld, welches Du durchsuchen willst heißt glaube ich "Farbe", so hab ich es im Script jedenfalls genannt. Wenn es anders heißt, musst Du den Namen ändern.

Wenn Du dann im Suchfeld "g" eingibst, kommen die Farben mit einem g, z.B. grün, gelb
Wenn Du "ge" angibst kommt nur noch gelb

viel Erfolg
Rudolf
Top of the page Bottom of the page