Formular mit ungebundenen Suchfeld

[chappi]

Hallo Leute,

Ich habe folgendes Problem,

Ich habe ein Formular in dem ich meine Artikel verwalte.
Zu jedem Artikel gibt es einen Alternativen Artikel der in einem separaten Feld angezeigt wird.
Zu den Artikel gelange ich über ein ungebundenes Suchfeld.
Nun möchte ich erreichen, das wenn man einen doppelklick auf den Alternativen Artikel macht das er über mein ungebundenen Suchfeld selektiert wird.
Ich habe es über eine Variable versucht komme aber nicht weiter da er mir den Wert nicht ins Suchfeld übergibt.

Ich hoffe mir kann jemand helfen

Danke
Chappi

[DF6GL]

Hallo,

zeige bitte den Tabellenaufbau und den Code, der zum Suchen benutzt wird.


Prinzipiell (und ohne Berücksichtigung von Normalisierungsregeln):

Code [Auswählen] Erweitern

Sub AltArtikelname_DblClick(Cancel as Integer)
Me!!AltArtikelname = Me!AltArtikelname
Me.Recordset.Findfirst "Artikelname= '" & Me!AltArtikelname & "'"
End Sub

[chappi]

Datenherkunft:
SELECT Artikel.[ID], Artikel.Artikel, Artikel.Bezeichnung FROM Artikel ORDER BY Artikel.Artikel;
mein Code:
Private Sub SucheArtNr_AfterUpdate()
Me.RecordsetClone.FindFirst "[ID] = " & Me![SucheArtNr]
    Me.Bookmark = Me.RecordsetClone.Bookmark
    Me.FilterOn = False
        Me.BIN.SetFocus
End Sub

[chappi]

Danke ich habs.
Ich habe es so gelöst:

Private Sub alt_artikel_DblClick(Cancel As Integer)
Me!SucheArtNr = Me!alt_artikel
Me.Recordset.FindFirst "Artikel= '" & Me!alt_artikel & "'"
End Sub

Danke für die hilfe