Access-o-Mania

Access-Forum (Deutsch/German) => Tabelle/Abfrage => Thema gestartet von: Frank77 am Dezember 02, 2011, 13:08:02

Titel: Problem mit SQL String In Vba Duplikaten suche mit INNER JOIN und Filterkriteri
Beitrag von: Frank77 am Dezember 02, 2011, 13:08:02
Hallo
Ich hab da ein Problem mit einem SQL String ursprünglich verwende ich in einer VBA Prozedur diesen um einen Listenfeld zu füllen  um damit Werte für das filtern des Recorders zu übergeben  

LstKategorieFilter.RowSource = "SELECT [KatID], [KatName] FROM [TblKategorien] WHERE [KatWGruppenIDRef] = " & Format(lstWarengruppeFilter.Column(0)) & " ORDER BY [KatID];"

Da es aber dabei  zu Fehlern kommt wenn das Kriterium das im Listenfeld beinhaltet ist  nicht in der TblArtikel vergeben ist  müsste ich das Listenfeld nur mit vergebenen werten füllen
In einer Abfrage würde das dann so aussehen allerdings müsste ich das    = " & Format(lstWarengruppeFilter.Column(0)) & " ORDER BY [KatID];"   mit einbauen
Damit der Filter der Listenfelder  funktioniert Bzw. das Filter Kriterium aus dem übergeordneten Listenfeld zu übergeben  

LstKategorieFilter.RowSource = "SELECT DISTINCT [KatID], [KatName], [ArtKatIDRef] FROM TblKategorien INNER JOIN TblArtikel ON TblKategorien.KatID = TblArtikel.ArtKatIDRef;

In eine Abfrage kann ich es nicht speichern da sich im Formular  ein weiterer Filter auf 2 weitere Listenfelder weiter ergibt

Ich hoffe das mir da jemand eine Idee hat Gruß Frank
Titel: Re: Problem mit SQL String In Vba Duplikaten suche mit INNER JOIN und Filterkriteri
Beitrag von: Frank77 am Dezember 02, 2011, 16:21:26
hab den Leichtsinnsfehler gefunden ich musste es ja nur anhängen  ;D ;D