![\"Formular](\"..\/tl_files\/images\/pic_204_001.png\")
<\/a><\/p>\nBild 1: Formular zum Filtern nach Kombinationsfeldern und ihren Inhalten<\/p>\n
Im Detailbereich haben wir ein Unterformular namens frmFilternNachKombinationsfeld <\/b>eingerichtet, das die Daten der Tabelle tblArtikel <\/b>anzeigt.<\/p>\nFiltern nach der gebundenen Spalte<\/h2>\n
Das Kombinationsfeld cboLieferantNachID <\/b>soll nach der Auswahl eines Eintrags direkt diejenigen Artikel im Unterformular anzeigen, die vom angegebenen Lieferanten geliefert werden. Dazu muss das Kombinationsfeld allerdings erst einmal alle Lieferanten anzeigen. Diese können Sie auf zwei Arten beziehen:<\/p>\n Da beide Varianten interessant sind, schauen wir uns beide an. Im ersten Fall weisen Sie der Eigenschaft Datensatzherkunft<\/b> des Kombinationfeldes die folgende SQL-Anweisung zu:<\/p>\n Die Datensätze der Tabelle tblLieferanten <\/b>werden durch die Klausel ORDER BY Firma <\/b>direkt nach dem Firmennamen des Lieferanten sortiert.<\/p>\n Damit das Kombinationsfeld nur die Werte des zweiten Feldes anzeigt, aber den Wert aus dem Feld LieferantID <\/b>aus dem ersten Feld als gebundene Spalte verwendet, stellen Sie noch die beiden folgenden Eigenschaften ein:<\/p>\n Das Filtern selbst ist relativ leicht – Sie brauchen nur eine Ereignisprozedur für die Ereigniseigenschaft Nach Aktualisierung <\/b>des Formulars zu hinterlegen, welche den Filterausdruck des Unterformulars einstellt. Diese Ereignisprozedur finden Sie in Listing 1.<\/p>\n Listing 1: Lieferanten nach ID filtern<\/p>\n Nach der Auswahl eines der Einträge aus dem Kombinationsfeld zeigt das Unterformular nun bereits alle verfügbaren Einträge an (siehe Bild 2).<\/p>\n Bild 2: Filtern von Datensätzen nach der gebundenen Spalte des Nachschlagefeldes<\/p>\n Was aber geschieht, wenn Sie wieder alle Datensätze anzeigen möchten Das Leeren des Kombinationsfeldes hilft an dieser Stelle nicht weiter. Genau genommen löst dies nach der Aktualisierung des Kombinationfeldes etwa durch Betätigen der Eingabetaste sogar einen Fehler aus – und zwar Fehler 3075<\/b>, Syntaxfehler (fehlender Operator) in Abfrageausdruck ‚LieferantID = ‚<\/b>. Da cboLieferantNachID <\/b>leer ist, stellt die Prozedur also einen ungültigen Ausdruck zusammen. Dies können Sie mit einer einfachen Prüfung umgehen: Sie fragen einfach vor dem Setzen des Filters den Wert des Kombinationfseldes ab. Ist dieser Null<\/b>, wird der Inhalt durch 0 <\/b>ersetzt. In diesem Fall leert die neue Version der Prozedur aus Listing 2 den Filter und das Unterformular zeigt wieder alle Datensätze an. Anderenfalls führt das Formular den Filter wie gewohnt aus.<\/p>\n Listing 2: Berücksichtigung eines geleerten Kombinationsfeldes zur Auswahl der Artikel<\/p>\n Eine weitere Alternative ist ein spezieller Eintrag im Kombinationsfeld, der die Bezeichnung Dieser Wert sollte außerdem als erster Eintrag des Kombinationsfeldes angezeigt werden. Dazu ist ein kleiner Trick nötig, der den Einsatz des UNION<\/b>-Schlüsselworts erforderlich macht.<\/p>\n Solche Abfragen können Sie nicht über den Abfrageentwurf, sondern nur über die SQL-Ansicht eingeben. Also gehen Sie folgendermaßen vor (im Beispielformular unter cboLieferantNachIDUndAlle <\/b>zu finden):<\/p>\n Bild 3: Abfrage zur Anzeige eines Eintrags mit dem Text Möchten Sie weiterlesen? Dann lösen Sie Ihr Ticket!<\/span>\n
SELECT LieferantID, Firma \r\nFROM tblLieferanten ORDER BY Firma;<\/pre>\n
\n
Private Sub <\/span>cboLieferantNachID_AfterUpdate()\r\n With<\/span> Me!sfmFilternNachKombinationsfeld.Form\r\n .Filter = \"LieferantID = \" & Me!cboLieferantNachID\r\n .FilterOn = True<\/span>\r\n End With<\/span>\r\nEnd Sub<\/span><\/pre>\n<\/a><\/p>\nAlle Artikel anzeigen<\/h2>\n
Private Sub <\/span>cboLieferantNachID_AfterUpdate()\r\n With<\/span> Me!sfmFilternNachKombinationsfeld.Form\r\n If <\/span>Not<\/span> Nz(Me!cboLieferantNachID, 0) = 0 Then<\/span>\r\n .Filter = \"LieferantID = \" & Me!cboLieferantNachID\r\n .FilterOn = True<\/span>\r\n Else<\/span>\r\n .Filter = \"\"\r\n End If<\/span>\r\n End With<\/span>\r\nEnd Sub<\/span><\/pre>\n\n
“ width=“325″ \/><\/a><\/p>\n
\nHier geht es zur Bestellung des Jahresabonnements des Magazins Access [basics]<\/strong>:<\/span>
\nZur Bestellung ...<\/a><\/span>
\nDanach greifen Sie sofort auf alle rund 400 Artikel<\/strong> unseres Angebots zu - auch auf diesen hier!<\/span>
\nOder haben Sie bereits Zugangsdaten? Dann loggen Sie sich gleich hier ein:<\/span><\/p>\n<\/div>\n\n\t\n\t