Hallo Zusammen,
Ich habe da ein kleines Problem mit Datentypen.
In einem Formular habe ich Kombinationsfeld erstellt mit dem ich gerne einen bestimmten Datensatz auswählen möchte und dann im Formular angezeigt bekomme.
Funktioniert mit diesem Code auch einwandfrei:
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "ID = " & Int(Me!cboAuswahl)
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
In einem anderen Formular das Gleiche Prozedere. Allerdings ist das Suchkriterium hier keine ID (Zahl) sondern Lieferschein (Text). Also habe ich den Code angepasst:
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "Lieferschein = " & str(Me!cboAuswahl)
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
Funktioniert aber nicht! Bekomme immer eine Fehlermeldung (Datentyp unverträglich).
Hat jemand eine Idee wie ich das anpassen muss?
Ich schätze, weil im Kombinationsfeld die ID ausgelesen wird (Spalte1) und nicht der Lieferschein.
Mit Me!cboAuswahl.column(2)
sollte das behoben werden können.........
Kann aber auch anders sein, zur Kontrolle mal ein Msgbox Me!cboAuswahl einfügen und schauen, was er da hat.....
Danke, aber das funktioniert leider auch nicht.
Mal die Msgbox eingefügt ?
Was gibt er da für "Me!cboAuswahl" aus ?
Du musst .column(1) nehmen......Anfängerfehler meinerseits
Danke, für die Unterstützung. Ich habe das jetzt anders geregelt.