Neuigkeiten:

Wenn ihr euch für eine gute Antwort bedanken möchtet, im entsprechenden Posting einfach den Knopf "sag Danke" drücken!

Mobiles Hauptmenü

Abfragekriterien aus 2 Komboboxen

Begonnen von addi23, Mai 24, 2023, 13:58:24

⏪ vorheriges - nächstes ⏩

addi23

Hallo Zusammen,
ich stehe vor einem Problem. Ich habe in einem Formular 2 Komboboxen die ja mit einer Abfrage verbunden sind um dort Filterkriterien auszuwählen.
Diese Filterkriterien möchte ich in der "Hauptabfrage" integrieren...funktioniert auch bestens über
[Forms]![frmMain]![Kriterium1]  und  [Forms]![frmMain]![Kriterium2].
Jetzt das Problem...wenn im Kriterium1 "ABC" steht, muss der Inhalt von Kriterium2 zusätzlich als Filter in der "Hauptabfrage" hinterlegt werden. Für alle anderen Kriterium1 soll Kriterium2 irrelevant sein. Das Problem ist das wenn ich in der Kombobox zu Kriterium2 nichts auswähle hier in der Abfrage wohl nach leerem Inhalt gesucht wird und mit, da überall ein Wert enthalten ist, dann eine Leere Liste erstellt wird.
Ich habe es versucht wie folgt zu lösen aber leider ohne Erfolg - habt Ihr eine Idee...?

IIf(IsNull([Forms]![frmMain]![Kriterium2]);Not IsNull;[Forms]![frmMain]![Kriterium2])

Vielen Dank und Gruß, Addi23

PhilS

Du könntest deine logischen Bedingungen als Where-Klausel der Abfrage aufbauen:

SELECT *
FROM Irgendwo
WHERE (Irgendwas =  [Forms]![frmMain]![Kriterium1] 
            AND [Forms]![frmMain]![Kriterium1] <> 'ABC')
OR (Irgendwas = [Forms]![frmMain]![Kriterium1] 
            AND EtwasAnderes =  [Forms]![frmMain]![Kriterium2])
Neue Videoserie: Windows API in VBA

Klassische CommandBars visuell bearbeiten: Access DevTools CommandBar Editor

addi23

Hallo PhilS,
vielen Dank für Dein Feedback - aber leider bekomme ich das nicht gangbar hinterlegt - muss mir da wohl was anderes einfallen lassen!
Viele Grüße Addi23

PhilS

Zitat von: addi23 am Mai 25, 2023, 07:40:47leider bekomme ich das nicht gangbar hinterlegt - muss mir da wohl was anderes einfallen lassen!
Hmmm...?
Du müsstest in meinem Beispielcode eigentlich nur meine Irgendwo/Irgendwas-Platzhalter durch deine tatsächlichen Tabellen/Spalten-Namen ersetzen.
 
Neue Videoserie: Windows API in VBA

Klassische CommandBars visuell bearbeiten: Access DevTools CommandBar Editor

addi23

Du hast Recht - ich habe es mir nochmal genau angeschaut....und als ich dann die Logik dahinter verstanden habe - konnte ich mit einer zusätzlichen Anpassung das korrekte Ergebnis erzeugen!!
Vielen lieben Dank für Deine Hilfe
VG Addi23