Access-o-Mania

Access-Forum (Deutsch/German) => Access Programmierung => Thema gestartet von: Nadeshiko am Juni 16, 2015, 14:55:36

Titel: Unendliches Formular und Abfrage per VBA
Beitrag von: Nadeshiko am Juni 16, 2015, 14:55:36
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
Titel: Re: Unendliches Formular und Abfrage per VBA
Beitrag von: MzKlMu am Juni 16, 2015, 15:17:32
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.
Titel: Re: Unendliches Formular und Abfrage per VBA
Beitrag von: Nadeshiko am Juni 16, 2015, 15:41:49
 :o Ja hab schon ganz vergessen, dass das geht... DANKE!