Umstellung Text in Zahl -> Suche Listenfeld funktioniert nicht mehr

[mad]

Hallo Zusammen,

habe in meiner "tblArtikel" das Feld "InventarNr" von Text auf Zahl (Long Integer) umgestellt. Habe ich wegen den Beziehungen gemacht.

In meinem Artikelformular "frmInGebrauch" habe ich ein Listenfeld "lstInGebrauch" in dem alle In Gebrauch befindlichen Artikel (InventarNr u. Bezeichnung) gelistet werden. Bisher wurde durch einen Doppelklick auf einen der Einträge der entsprechende Eintrag im Hauptformular gesucht und angezeigt.

Das funktioniert jetzt leider nicht mehr.
Code:

Code [Auswählen] Erweitern

Private Sub lstInGebrauch_DblClick(Cancel As Integer)
    Me.Recordset.FindFirst "InventarNr = '" & Me!lstInGebrauch & "'"
End Sub

Ich denke es liegt an den "-Zeichen, weis aber leider nicht wie den Code ändern müsste das es wieder funktioniert.

Über Unterstützung würde ich mich sehr freuen.

Danke
mad

[MzKlMu]

Hallo,
bei Zahlen entfallen die Hochkomma.

Code [Auswählen] Erweitern

   Me.Recordset.FindFirst "InventarNr = " & Me!lstInGebrauch

[mad]

Besten Dank,
funktioniert prima.

Gruss
mad