Außerdem werden einige Feiertage nicht in allen, sondern nur in bestimmten Bundesländern gefeiert.<\/p>\n
Tabelle oder dynamisch<\/h2>\n
Die Ermittlung von Feiertagen kann auf zwei Arten erfolgen – dynamisch zur Laufzeit, also mit einer geeigneten VBA-Prozedur, oder durch das Speichern der Feiertage in einer Tabelle und anschließendes Ermitteln der Feiertage. Wenn wir schon mit Access arbeiten, nutzen wir natürlich die Variante mit der Tabelle. Mit dieser Tabelle lässt sich anschließend leicht ermitteln, ob und wieviele Feiertage sich in einem bestimmten Zeitraum befinden.<\/p>\n
Basistabellen<\/h2>\n
Wir wissen nun, dass Feiertage bestimmte Eigenschaften haben. Um die Feiertagsdaten für einen Zeitraum zu ermitteln, benötigen wir einen Satz grundlegender Informationen, die wir – der Natur von Access entsprechend – in Tabellen speichern. Wir wissen, dass Feiertage teils ein festes Datum haben und teils von anderen Feiertagen abhängen. Deshalb speichern wir die grundlegenden Informationen in einem Satz von Tabellen. Die erste legt fest, welche Arten von Feiertagen es gibt – mit fixem Datum, von Ostern abhängige oder vom vierten Advent abhängige. Diese drei Varianten speichern wir in einer Tabelle namens tblFeiertagsarten<\/b>, die im Entwurf wie in Bild 1 aussieht.<\/p>\n
Bild 1: Tabelle der Feiertagsarten in der Entwurfsansicht<\/p>\n Gefüllt sieht die Tabelle wie in Bild 2 aus. Was machen wir mit dieser Tabelle Wir verwenden sie als Lookup-Tabelle für eine weitere Tabelle mit den eigentlichen Basisdaten der einzelnen Feiertage. Diese heißt tblFeiertageBasis <\/b>und sieht im Entwurf wie in Bild 3 aus.<\/p>\n Bild 2: Tabelle der Feiertag-Basisdaten in der Entwurfsansicht<\/p>\n Bild 3: Tabelle der Feiertagsarten mit allen Werten<\/p>\n In dieser Tabelle finden Sie Daten wie in Bild 4. Zu jedem Feiertag speichert die Tabelle <\/p>\n Bild 4: Tabelle der Feiertag-Basisdaten in der Datenblattansicht<\/p>\n Was fehlt Die Zuordnung der Feiertage zu den Bundesländern. Wie speichern wir diese Information in Tabellen Es gibt n <\/b>Feiertage und m <\/b>Bundesländer, von denen jeder Feiertag einem oder mehreren Bundesländern zugeordnet werden soll. Das hört sich nach einer klassischen m:n-Beziehung an – und so ist es auch. Die eine Tabelle der m:n-Beziehung haben wir schon – die Tabelle tblFeiertageBasis<\/b>. Fehlt noch die Tabelle mit den Bundesländern und die Tabelle für die Verknüpfung der Bundesländer mit den Feiertagen.<\/p>\n Die Tabelle zum Speichern der Bundesländer besteht lediglich aus den beiden Feldern BundeslandID <\/b>und Bundesland<\/b>. Interessanter ist die Tabelle zum Herstellen der Verknüpfung zwischen Feiertagen und Bundesländern. Sie heißt tblFeiertageBundeslaender <\/b>und enthält drei Felder: das Primärschlüsselfeld FeiertagBundeslandID<\/b>, das Fremdschlüsselfeld FeiertagID <\/b>und das Fremdschlüsselfeld BundeslandID<\/b>.<\/p>\n Beide Felder legen Sie als Nachschlagefelder aus. Das Feld FeiertagID <\/b>bezieht die Werte des Nachschlagefeldes aus den Feldern FeiertagBasisID <\/b>und Feiertag <\/b>der Tabelle tblFeiertageBasis<\/b>, die Schlüsselspalte FeiertagBasisID <\/b>soll ausgeblendet werden. Auf diese Weise zeigt das Nachschlagefeld nur die Bezeichnungen der Feiertage an. <\/p>\n Das Feld BundeslandID <\/b>ist ähnlich aufgebaut: Es verwendet die Felder BundeslandID <\/b>und Bundesland <\/b>der Tabelle tblBundeslaender <\/b>zum Füllen des Nachschlagefeldes. Auch hier wird die Schlüsselspalte nicht angezeigt.<\/p>\n Schließlich wollen wir noch sicherstellen, dass die Tabelle keine Kombination auf Feiertag und Bundesland mehrfach aufnimmt. Dazu definieren Sie einen eindeutigen Index, der aus den beiden Feldern FeiertagID <\/b>und BundeslandID <\/b>zusammengesetzt wird. Diesen Index legen Sie im Entwurf der Tabelle mithilfe des Indizes<\/b>-Dialogs an. Dort befindet sich zumindest bereits der Index für das Primärschlüsselfeld der Tabelle. Fügen Sie einen neuen Index namens UniqueKey hinzu und wählen Sie untereinander die beiden Felder FeiertagID <\/b>und BundeslandID <\/b>aus. Markieren Sie dann wieder die erste Zeile, in der Sie auch den Indexnamen eingetragen haben, und stellen Sie die Eigenschaft Eindeutig <\/b>im unteren Bereich auf Ja <\/b>ein (siehe Bild 5).<\/p>\n Bild 5: Verknüpfungstabelle für Feiertage und Bundesländer<\/p>\n Nachdem die beiden Tabellen tblFeiertageBasis <\/b>und tblBundeslaender <\/b>mit Daten gefüllt wurden, können Sie die gewünschten Verknüpfungen zwischen Feiertagen und Bundesländern anlegen. Bild 6 verdeutlicht, dass die Beziehung eigentlich über in der Tabelle tblFeiertageBundeslaender <\/b>enthaltene Zahlenwerte hergestellt wird – hier haben wir die Feldeigenschaften so eingestellt, dass die Felder nicht die Werte der verknüpften Tabelle, sondern die tatsächlich in den Feldern Feiertag-ID <\/b>und BundeslandID <\/b>gespeicherten Werte anzeigen.<\/p>\n Bild 6: Verknüpfung von Feiertagen und Bundesländern<\/p>\n Nun benötigen wir ein Formular, mit dem wir die Feiertage verwalten können. Die Bundesländer geben wir einfach direkt in die Tabelle ein – aktuell ist ja nicht absehbar, dass neue Bundesländer hinzukommen oder Bundesländer wegfallen. Daher soll kein eigenes Formular zur Verwaltung der Bundesländer vorgesehen werden.<\/p>\n Das Formular heißt frmFeiertage <\/b>und verwendet die Tabelle tblFeiertageBasis <\/b>als Datenherkunft. Ziehen Sie alle Felder dieser Tabelle in den Formularentwurf und ordnen Sie diese etwa wie in Bild 7 an. Je nach dem Wert im Kombinationsfeld FeiertagArtID <\/b>sollen entweder die beiden Felder Tag <\/b>und Monat <\/b>oder das Feld TageBisStichtag <\/b>aktiviert sein.<\/p>\n Bild 7: Entwurf des Formulars frmFeiertage<\/p>\n Die Steuerelementnamen der vier Textfelder und des Kombinationsfeldes haben wir um die Präfixe txt <\/b>beziehungsweise cbo <\/b>erweitert.<\/p>\n Je nachdem, welche Feiertagsart ausgewählt ist, soll das Formular die Textfelder für die Eingabe des fixen Datums oder der Anzahl der Tage vor oder nach dem Stichtag aktivieren oder deaktivieren.<\/p>\n Dies soll also entweder beim Anzeigen eines Datensatzes oder nach der änderung des Inhalts des Kombinationsfeldes cboFeiertagArtID <\/b>geschehen. In beiden Fällen sollen die gleichen Schritte ausgeführt werden, also legen wir für diese Anweisungen eine eigene Prozedur an, die von zwei Ereignisprozeduren aus ausgelöst wird.<\/p>\n Damit diese Prozedur zu den passenden Gelegenheiten aufgerufen wird, legen Sie zwei Ereignisprozeduren an. Die erste soll beim Anzeigen eines jeden Datensatzes ausgelöst werden. Dazu stellen Sie für die Eigenschaft Beim Anzeigen <\/b>des Formulars in der Entwurfsansicht den Wert [Ereignisprozedur] <\/b>ein und klicken auf die Schaltfläche mit den drei Punkten. Die nun im VBA-Editor erscheinende Prozedur ergänzen Sie wie folgt:<\/p>\n Möchten Sie weiterlesen? Dann lösen Sie Ihr Ticket!<\/span>![\"Tabelle](\"..\/tl_files\/images\/pic_185_001.png\")
<\/a><\/p>\n<\/a><\/p>\n<\/a><\/p>\n<\/a><\/p>\n\n
<\/a><\/p>\n<\/a><\/p>\nFeiertage und Bundesländer verwalten<\/h2>\n
<\/a><\/p>\nEingabefelder aktivieren und deaktivieren<\/h2>\n
Private Sub <\/span>Form_Current()\r\n Call<\/span> TextfelderAktivieren\r\nEnd Sub<\/span><\/pre>\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