<\/p>\n
Abfragen sind nicht darauf beschränkt, nur Felder aus einer Tabelle auszugeben oder nach Feldern aus einer Tabelle zu sortieren oder zu filtern. Wir können auch mehrere Tabellen in einer Abfrage zusammenfassen und die Daten dieser Tabellen ausgeben, filtern und sortieren. Dabei gibt es verschiedene Möglichkeiten: Wir können alle Kombinationen aus Daten verschiedener Tabellen ausgeben, wir können nur die verknüpften Datensätze von Tabellen liefern oder auch die Daten einer Tabelle liefern – unabhängig davon, ob in der verknüpften Tabelle auch verknüpfte Datensätze zur ersten Tabelle vorhanden sind. All diese Techniken schauen wir uns im vorliegenden Artikel an.<\/p>\n
Die Beispiele dieses Artikels findest Du in der Datenbank AbfragenBasics_VerknuepfteUndUnverknuepfteTabellenGezieltNutzen.accdb<\/b>.<\/p>\nBeliebige Kombinationen aus den Daten zweier Tabellen ermitteln<\/h2>\n
Dies ist zum Beispiel sinnvoll, wenn Du alle möglichen Datumsangaben bestehend aus Monaten und Jahren kombinieren möchtest. Dazu benötigen wir eine Tabelle namens tblJahre<\/b>, die alle anzuzeigenden Jahre enthält, und eine namens tblMonate<\/b>, welche die zwölf Monate beisteuert. Wir erstellen die beiden Tabellen, und um Zeit zu sparen, lassen wir die Werte per VBA eintragen. Erst einmal die Monate, wobei wir die Nummer des Monats von 1 <\/b>bis 12 <\/b>eintragen und den Namen des Monats mit der VBA-Funktion MonthName <\/b>ermitteln und in das Feld Monatsname <\/b>eintragen:<\/p>\n Danach schreiben wir die Jahre in die Tabelle tblJahre<\/b>, hier für die Jahre von 2020 <\/b>bis 2030<\/b>:<\/p>\n Die beiden Prozeduren können wir einfach in ein Standardmodul schreiben und mit F5 <\/b>ausführen. Damit erhalten wir die Tabellen wie in Bild 1.<\/p>\n Bild 1: Tabellen mit Monaten und Jahren<\/p>\n Wir wollen in einer Abfrage alle Kombinationen aus Monaten und Jahren ausgeben, und zwar aufsteigend sortiert nach dem Jahr und dem Monat. Die Felder sollen aber in der Reihenfolge Monat\/Jahr ausgegeben werden.<\/p>\n Dazu erstellen wir eine neue, leere Abfrage in der Entwurfsansicht und ziehen die beiden Tabellen tblMonate <\/b>und tblJahre <\/b>hinein. Damit erreichen wir, dass die Abfrage grundsätzlich jede Kombination aus Monaten und Jahren ausgibt. Damit sie auch in Abfrageergebnis erscheinen, fügen wir die beiden Felder Monat <\/b>und Jahr <\/b>zum Entwurfsraster hinzu. Wenn wir jetzt in die Datenblattansicht wechseln, sehen wir die Daten allerdings in der Standardsortierung, also zunächst aufsteigend nach dem Monat und dann nach dem Jahr. Wir wollen aber, dass zuerst 1-2020<\/b>, 2-2020 <\/b>und so weiter angezeigt werden. Dazu fügen wir das Feld Monat <\/b>ein weiteres Mal hinzu und sortieren dann aufsteigend nach der zweiten und der dritten Spalte, also erst nach dem Jahr und dann nach dem Monat. Da die dritte Spalte nur als Sortierkriterium dient und nicht angezeigt werden soll, entfernen wir den Haken in der Zeile Anzeigen<\/b> für diese Spalte (siehe Bild 2).<\/p>\n Bild 2: Abfrage zur Kombination von Monaten und Jahren<\/p>\n Die Datenblattansicht sieht jetzt wie in Bild 3 aus.<\/p>\n Bild 3: Anzeige von Monaten und Jahren in der gewünschten Reihenfolge<\/p>\n Im nächsten Beispiel wollen wir die gleichen Daten im Format Januar 2020, Februar 2020 und so weiter anzeigen. Dazu verwenden wir den Entwurf aus Bild 4.<\/p>\n Bild 4: Abfrage zur Anzeige von Monatsname und Jahr in der Entwurfsansicht<\/p>\n Wir fügen wieder beide Tabellen hinzu, verwenden aber in der ersten Spalte dieses Mal den folgenden Ausdruck:<\/p>\n Damit geben wir die Daten im gewünschten Format aus. Um die Daten wieder nach Jahr und Monat zu sortieren, fügen wir diese beiden Felder nochmals hinzu, stellen die Sortierung auf Aufsteigend <\/b>ein und blenden die Felder aus (siehe Bild 5).<\/p>\n Bild 5: Anzeige von Monatsname und Jahr<\/p>\n Nachdem wir betrachtet haben, welches Ergebnis Abfragen liefern, die nicht verknüpfte Tabellen enthalten, schauen wir uns nun verknüpfte Tabellen an. Dazu erstellen wir zwei Tabellen mit den Namen tblKunden <\/b>und tblAuftraege<\/b>. Die Tabelle tblKunden <\/b>enthält die beiden Felder KundeID <\/b>(Primärschlüsselfeld) und Kunde<\/b>, die Tabelle tblAuftraege <\/b>enthält die Felder AuftragID <\/b>(Primärschlüsselfeld), KundeID <\/b>und Auftrag<\/b>.<\/p>\n Für die beiden Tabellen stellen wir eine Beziehung über das Primärschlüsselfeld KundeID <\/b>der Tabelle tblKunden <\/b>und das gleichnamige Feld der Tabelle tblAuftraege <\/b>her und legen dafür referenzielle Integrität fest (siehe Bild 6).<\/p>\n Bild 6: Beziehung zwischen den Tabellen tblKunden und tblAuftraege<\/p>\n Möchten Sie weiterlesen? Dann lösen Sie Ihr Ticket!<\/span>Public Sub <\/span>MonateSchreiben()\r\n Dim <\/span>db As <\/span><\/span>DAO.Database\r\n Dim <\/span>i As Integer<\/span><\/span> \r\n Set<\/span> db = CurrentDb\r\n For i = 1 To 12\r\n db.Execute \"INSERT INTO tblMonate(Monat, \" _\r\n & \"Monatsname) VALUES(\" & i & \", '\" _\r\n & MonthName(i) & \"')\", dbFailOnError\r\n Next<\/span> i\r\nEnd Sub<\/span><\/pre>\nPublic Sub <\/span>JahreSchreiben()\r\n Dim <\/span>db As <\/span><\/span>DAO.Database\r\n Set<\/span> db = CurrentDb \r\n Dim <\/span>i As Integer<\/span><\/span>\r\n For i = 2020 To 2030\r\n db.Execute \"INSERT INTO tblJahre(Jahr) \" _\r\n & \"VALUES(\" & i & \")\", dbFailOnError\r\n Next<\/span> i \r\nEnd Sub<\/span><\/pre>\n![\"Tabellen](\"..\/tl_files\/images\/pic_702_001.png\")
<\/a><\/p>\n<\/a><\/p>\n<\/a><\/p>\nAnzeige von Monatsname und Jahr<\/h2>\n
<\/a><\/p>\nMonatJahr: [Monatsname] & \" \" & [Jahr]<\/pre>\n
<\/a><\/p>\nAbfragen mit verknüpften Tabellen<\/h2>\n
<\/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