Excel 7.0:
Eine neue Funktion erkennt Feiertage

Bei der Berechnung von Arbeits-, Urlaubs- oder Fehlzeiten mⁿssen normalerweise
Wochenenden und Feiertage in Betracht gezogen werden. Allerdings ist Excel dafⁿr nicht optimal ausgestattet. Mit einer neuen Funktion k÷nnen Sie jedoch dafⁿr sorgen, da▀ Excel den Inhalt einer Zelle mit einer von Ihnen angelegten Liste der freien Tage vergleicht und entweder den Wert »WAHR« ausgibt, wenn er in der Liste enthalten ist, oder »FALSCH«, wenn das nicht der Fall ist. Diese Werte k÷nnen wiederum in den Arbeitszeit-Berechnungstabellen verwendet werden. Wenn Sie Excel mit der Funktion »IstFeiertag« ausstatten m÷chten, legen Sie zunΣchst mit »Einfⁿgen | Makro | Visual Basic-Modul« ein
neues Modul an und geben das unten angefⁿgte Listing ein. Um die neue Funktion auszuprobieren, tragen Sie in einem Tabellenblatt der gleichen Arbeitsmappe einige Datumswerte und eine Liste der Feiertage wie in der Abbildung ein.
Klicken Sie dann auf die Zelle, in der »WAHR« oder »FALSCH« erscheinen soll, und wΣhlen »Einfⁿgen | Funktion«. In der »Kategorie« mit der Bezeichnung »Benutzerdefiniert« finden Sie den Eintrag »IstFeiertag«, den Sie mit einem Doppelklick auswΣhlen. In der folgenden Dialogbox klicken Sie in das erste Feld »Datum« und anschlie▀end auf die Zelle, die das zu ⁿberprⁿfende Datum enthΣlt. Danach klicken Sie in das Feld »Feiertagsliste« und markieren den Zellbereich mit der Feiertagsliste in der Tabelle.
Nach einem Klick auf »Ende« erscheint dann als Ergebnis »FALSCH« oder »WAHR« in
dieser Zelle. Damit diese Funktion nicht nur in der aktuellen Arbeitsmappe vorliegt, sondern grundsΣtzlich zur Verfⁿgung steht, mⁿssen Sie sie in ein sogenanntes "Add-In" umwandeln.
Dazu wechseln Sie wieder auf die Seite »Modul1« Ihrer Arbeitsmappe und wΣhlen »Extras | Add-In erstellen«. Speichern Sie diese Datei am besten unter dem Namen »IstFeiertag«. ▄ber den Add-In-Manager k÷nnen Sie das neue Add-In jetzt in Excel integrieren. ╓ffnen Sie dafⁿr den »Add-In-Manager« in dem Menⁿ »Extras« und wΣhlen nach einem Klick auf »Durchsuchen« den Ordner aus, in dem Sie das Add-In gespeichert haben. Dort doppelklicken Sie auf die Datei »IstFeiertag«, und ab sofort erscheint diese Funktion in der Liste »Verfⁿgbare Add-Ins« des Add-In-Managers und kann mit einem HΣkchen aktiviert werden.
Visual-Basic-Code zur Ermittlung von Feiertagen
Funktion IstFeiertag(Datum; Feiertagsliste)
IstFeiertag = Falsch
Fⁿr i = 1 Bis (Anwendung.Anzahl2(Feiertagsliste) + Anwendung.AnzahlLeereZellen(Feiertagsliste))
Wenn Datum = Feiertagsliste(i) Dann IstFeiertag = Wahr
NΣchste
Ende Funktion