Unendliches Formular und Abfrage per VBA

[Nadeshiko]

Hallo!

Ich hab ein Formular, welches die Rechnungen in einer unendlichen Tabelle anzeigt. In einem Textfeld sollte aber durch die MesseNr, der MesseName erscheinen (andere Tabelle)

Jetzt wollte ich per VBA eine Abfrage einbauen:

If Me.RecordsetClone.RecordCount > 0 Then
    Me.txtMesse = Nz(DLookup("[MesseName]", "tblMessen", "[MesseNr] = '" & Forms!frmRechnungDeb!txtMesseNr1 & "'"), "Unbekannte Messe")
Else
    Exit Sub
End If

Leider ist es so, dass er mir zwar die richtige Messe anzeigt, aber das bei allen Rechnungen. Sprich, hat ein Kunde mehrere Rechnungen für zwei verschiedene Messen, spuckt er mir bei allen Rechnungen gleiche Messe raus.

Irgendein TIPP?

Danke + Grüße
Nades

[MzKlMu]

Hallo,
erstelle ein Abfrage mit beiden Tabellen und der Verknüpfung über die MesseNr.
Dann hast Du alle Felder aus beiden Tabellen zur Anzeige.
VBA wird dazu nicht benötigt.

[Nadeshiko]

  Ja hab schon ganz vergessen, dass das geht... DANKE!