Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1432to1436
1432to1436
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Feiertage mit Namen anzeigen

Forumthread: Feiertage mit Namen anzeigen

Feiertage mit Namen anzeigen
12.07.2015 18:47:03
Debian
Hallo zusammen :-)
In meiner Dienstplantabelle (12 Blätter für jeden Monat und 1 Blatt mit den Abkürzungen für die Dienste, Daten der Feiertage, Erklärungen etc.) möchte ich die im Hilfsblatt "Legende und Wegleitung" aufgeführten Feiertage in den Dienstplanblättern anzeigen lassen. Die Feiertage werden bereits farbig markiert, dazu wird mittels bedingter Formatierung auf vordefinierte Listen aus dem Hilfsblatt zugegriffen (zum Beispiel "FT" (='Legende und Wegleitung'!$G$6:$G$55) für Feiertage mit der Formel
=ODER(REST(D$1;7)=1;ZÄHLENWENN(FT;D$1)>0)~f~ für den Zellbereich ~f~Monat!$D$1:$AH$81
Dadurch wird die gesamte Spalte im Dienstplan bis Zeile 81 rot eingefärbt. Das Datum selber steht als Zahl und als Kurzbezeichnung für den Wochentag in den Zeilen 1 und 2 untereinander.
In Zeile 3 Möchte ich nun gerne noch den Name des Feiertags einblenden lassen. Die Namen stehen im Blatt 'Legende und Wegleitung' in Spalte H jeweils direkt hinter dem zugehörigen Datum.
Hat jemand eine Idee?
Merci im Voraus :-)
Debian

Anzeige

18
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Feiertage mit Namen anzeigen
12.07.2015 18:49:50
Bernd
Hallo!
und Du glaubst, dass irgendjemand Deine Dienstplantabelle nachbauen wird bzw. alle Hellseher sind?
Also, Beispieldatei wäre SEHR von Vorteil.
Gruß und schönen restlichen Sonntag,
mfg Bernd

warum nicht vba?
14.07.2015 07:23:46
Michael
Hi zusammen,
mit einem simplen Makro lassen sich die Feiertage eintragen:
Sub ft_kopieren() Dim c As Range Dim monat$, tag& With Sheets("Legende und Wegleitung") For Each c In .Range("g6:g17") monat = Format(c, "MMMM") tag = Day(c) Sheets(monat).Cells(3, tag + 3).Value = c.Offset(0, 1).Value MsgBox "Feiertag eingetragen" Next End With End Sub Die MsgBox ist natürlich im Praxisbetrieb useless, aber hier kannst Du (ob das auf dem Meck auch so geht?) mit Strg+Break abbrechen, derweil Du ja a) nicht alle Monatsblätter vollständig angelegt hast und b) den März unsinnigerweise mit ae schreibst.
Mach halt ne vernünftige Fehlerroutine drumrum.
Schöne Grüße,
Michael
P.S.: "alle Feiertage liegen auseinander", naja, sieh Dir mal XMas an.

Anzeige
Sollte mit SVerweis klappen ... owT
12.07.2015 18:57:55
Matthias

Hab ich doch geschrieben: SVerweis! ... owT
12.07.2015 19:11:31
Matthias

Anzeige
AW: Hab ich doch geschrieben: SVerweis! ... owT
12.07.2015 19:41:08
Debian
Hallo Wilfried :-)
Schaut schon mal interessant aus, merci :-) Hier mal meine Version des Dienstplanprogramms. Ich hab bissle Zweifel, das die Version aus Deiner Tabelle mit meiner funktioniert, ohne die massiv in ihren Funktionen zu verändern.
https://www.herber.de/bbs/user/98784.xlsm
Vielen Dank im Voraus :-)
Debian

Anzeige
Excel gut ? wo ist das Problem ?
12.07.2015 20:15:54
Matthias
Hallo
 DEF
1123
2DoFrSa
3Neujahrstag  

Formeln der Tabelle
ZelleFormel
D1=DATUM(A1;MONAT(B1&1);1)
E1=WENN(D1="";"";WENN(MONAT(D1+1)<>MONAT(D1);"";D1+1))
F1=WENN(E1="";"";WENN(MONAT(E1+1)<>MONAT(E1);"";E1+1))
D2=D1
E2=E1
F2=F1
D3=SVERWEIS(D2;'Legende und Wegleitung'!$G$6:$H$17;2;0)


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
Ich hab nur die Formel in D3 eingefügt.
Gruß Matthias

Anzeige
AW: Excel gut ? wo ist das Problem ?
12.07.2015 20:25:24
Debian
Danke Matthias, soweit funktioniert das. Allerdings erzeugt es bei mir in den Zellen, in denen nichts angezeigt werden kann (weil da kein Feiertag ist) ein #NV.
Das zweite "Problem": Bislang hatte ich die Namen der Feiertage manuell, zentriert eingetragen, so das die in voller Breite über den Zellrand hinaus, vollständig angezeigt wurden. Jetzt, da in jeder Zelle eine Formel steht, ist der angezeigte Text nur auf die jeweilige Zelle begrenzt. Gibt es dazu eine Lösung?
Merci für Deine Hilfe.

Anzeige
AW: Excel gut ? wo ist das Problem ?
12.07.2015 20:46:18
Matthias
Hallo
=WENNFEHLER(SVERWEIS(D2;'Legende und Wegleitung'!$G$6:$H$17;2;0);"")
Gruß Matthias

AW: Excel gut ? wo ist das Problem ?
12.07.2015 20:52:16
Debian
Merci Matthias, die #NV sind jetzt weg. Jetzt hats nur noch dieses Problem mit nicht über den Zellrand hinaus schreiben, weil ja nun in allen Zellen der Zeile 3 die Formel drin ist. Ich such schon im Web, hab dafür allerdings bislang keine Lösung gefunden, die ohne das verkleinern der Schriftart oder das vergrössern der Zellen auskommt :-(

Anzeige
Gibt's auch nur noch ZeilenUmbruch oder ...
12.07.2015 21:01:02
Luc:-?
…andere Schriftart (Condensed), Debian!
Luc :-?

schreib mit VBA den FT in einen Kommentar. owT
12.07.2015 21:06:08
Matthias

AW: schreib mit VBA den FT in einen Kommentar. owT
12.07.2015 21:12:05
Debian
Matthias, auch daran hab ich schon gedacht, leider ist das für den Ausdruck keine Option. Es soll ja nicht bloss für mich beim drüber hoovern über die Zelle sichtbar sein, sondern auch im Ausdruck sichtbar sein, ohne andere Informationen der Tabelle zu überdecken.
Gibt es eine andere Möglichkeit, die Information über die Namen der Feiertage in die Zellen zu transportieren, ohne in der Zielzelle eine Formel drin zu haben?

Anzeige
mach noch eine bed. Formatierung (gelb/rot)
12.07.2015 21:25:34
Matthias
Hallo
dann erstelle noch eine bedingte Formatierung
Es ist doch völlig egal wie der FT heißt, schreib einfach FT in die Zelle
 D
11
2Do
3FT

Formeln der Tabelle
ZelleFormel
D1=DATUM(A1;MONAT(B1&1);1)
D2=D1
D3=WENNFEHLER(WENN(SVERWEIS(D2;'Legende und Wegleitung'!G6:H17;2;0)<>"";"FT";"");"")


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
Gruß Matthias

Anzeige
AW: mach noch eine bed. Formatierung (gelb/rot)
12.07.2015 21:43:42
Debian
Auch den Gedanke hatt ich bereits, nur ist ja ohnehin bereits die ganze Spalte bei einem Feiertag via bedingter Formatierung rot markiert, bei sonstigen Events hellrot etc. War eben immer wichtig, das der Name des Anlasses, Feiertages, Events auch drin steht. Da, ausser an Weihnachten, die Feiertage nie direkt hintereinander liegen, war das händisch reinschreiben kein Problem, da links und rechts der zu beschreibenden Zelle noch genug freier Platz war. Naja, schaut so aus, als ob ich auch künftig von Hand da reinschreiben werde.

Anzeige
2.Problem: Spalte verbreitern u/o Schrift kleiner!
12.07.2015 20:51:42
Luc:-?
Gruß, Luc :-?

AW: Feiertage mit Namen anzeigen
13.07.2015 10:04:04
RPP63
Hi!
In der Zelle steht "Quatsch" (oder eben Dein Feiertag).
Das Zahlenformat ;;;"FT" zeigt Dir FT an.
Gruß Ralf

AW: Feiertage mit Namen anzeigen
13.07.2015 10:58:32
Debian
Ja, dafür wurde mir bereits eine Lösung mittels Formel für die Zellen in Zeile 3 angeboten. Leider kann der Name nun nur noch IN der jeweilgen Zelle angezeigt werden. Da die Zellen davor und danach ja nun nicht mehr leer sind, kann nicht über den Zellrand geschrieben werden, was für die Lesbarkeit des Namens des Feiertages aber sinnvoll ist. DAS an der Stelle ein Feiertag ist, wird bereits durch die Rotfärbung der kompletten Spalte unmissverständlich angezeigt. Aber merci für Deine Bemühungen :-)
Anzeige
;

Forumthreads zu verwandten Themen

Feiertage in Kalender farblich markieren
Andi

Hallo zusammen,
ich habe folgendes Problem:
ich möchte in meinem Kalender die Feiertage farblich markiert haben!
Wie kann ich dies machen?
Über eine Bedingte Formatierung?
zur Info:
https://www.herber.de/bbs/user/56384.xls
Kann mier jemand bei meinem Problem helfen?...
29.10.2008 22:21:44
Thread-ID: 1020435
4 Beiträge
Feiertage zwischen Beginn und Ende eintragen
Karsten

Guten liebe Leute,
mal wieder fuchst mich ein Problem, bei welchen meine "bescheidenen" VBA-Kenntnisse nicht ausreichen.
Ich habe im Tabellenblatt 1 eine Zelle B9. Hier soll das Ergebniss per VBA eingetragen werden. Im gleichen Tabellenblatt steht auf B6 das Beginndatum und B7 das Endd...
03.04.2009 09:41:05
Thread-ID: 1066575
8 Beiträge
Geburtstage aus Liste in einem Kalender eintragen
Rolf

Hallo Fachleute,
ich habe eine Frage an Jörg, der mir vor ein paar Tagen (27.01.2010) super zu meinem Geburstagsjahresplaner geholfen hat. Natürlich auch an alle anderen die mir helfen möchten. Leider weiß ich nicht wie ich den damaligen Thread nochmals editieren kann. Vielleicht ist er eve...
05.02.2010 16:32:57
Thread-ID: 1136221
2 Beiträge
Anzeige
Termin in Nichtstandardkalender in OL eintragen
Thomas

Hallo,
ich habe zwei Kalender in Outlook, in den "Nichtstandardkalender" möchte ich einen Termin eintragen.
In den Standardkalender habe ich das folgendermaßen getan:
Set OutApp = CreateObject("Outlook.Application")
Set apptOutApp = OutApp.CreateItem(olAppointmentItem)
With...
22.07.2010 14:33:29
Thread-ID: 1168314
2 Beiträge
Unsortierte Liste m. Termine in Kalender eintragen
Bernd

Hallo Cracks!
Nach mehreren gescheiterten Versuchen wende ich mich mit meinem Problem an euch. Mich plagt seit einigen Tagen folgendes. Ich erhalte in einer Datei in der in zwei Spalten Tagesdaten und Ereignisse / Termine stehen. Dabei sind die die Tagesdaten nicht sortiert und kommen aber...
18.12.2013 09:51:00
Thread-ID: 1342935
3 Beiträge
Anzeige
Bedingte Formatierung bei Feiertagen
Patrick

Hallo Profis,
ich möchte in https://www.herber.de/bbs/user/104983.xls
analog zu den Wochenenden über die bedingte Formatierung
die Feiertage einfärben.
Ich bekomme es nicht hin und bitte um eure fachkundige Hilfe.
Vielen Dank vorab.
Patrick
15.04.2016 10:07:41
Thread-ID: 1488175
3 Beiträge
Anzeige
Feiertage in variablem Kalender markieren
Sascha

Hi.Ich arbeite an einer Monatsabrechnung.
Ich habe eine Excel-Arbeitsmappe mit mehreren Arbeitsblättern(für mehrere Mitarbeiter). Auf der Hauptseite kann ich den Monat und das Jahr vorgeben, dann wird jeweils auf jeder Mitarbeiterseite, mittels einer Datums-Formel, der betreffende Monat als...
26.08.2002 11:46:45
Thread-ID: 152680
2 Beiträge
VBA bedingte Formatierung Wochen-/Feiertage
Peer

Hallo liebe VBA Gemeinde.
Ich sitze gerade an folgenden Problem.
Ich habe einen Jahres-Kalender auf mehrere Sheets verteilt und die Sheets mit den jeweiligen Monatsnamen benannt.
Ich habe den Kalender inzwischen so erstellt, dass mit Eingabe einer Ganzzahl als Jahr die Tage automati...
05.01.2018 17:22:57
Thread-ID: 1600434
20 Beiträge
Freie Tage in Kalender eintragen
Johann

Hallo Liebe Forumgemeinde,
Kann mir jemand für dieses Problem weiterhelfen?
Ich habe im Sheet "Daten" Namen stehen.
Einige davon haben in Gerader KW z.b. Di und Do frei
und in der ungeraden KW Mo, Mi und Fr frei.
Bild 1 vom Sheet mit den Daten
Bild 2 vom Sheet Januar
...
16.01.2018 17:34:18
Thread-ID: 1602633
17 Beiträge
Feiertage in Excelkalender per VBA eintragen
Adam23

Hallo,
ich bin auf der Suche nach einer Möglichkeit, Feiertage in einem Kalender per VBA eintragen zu lassen.
Ich bin bereits auf ein Beitrag in dem Forum Archiv gestossen:
https://www.herber.de/forum/archiv/1128to1132/1130235_Feiertage_in_Kalender_eintragen_per_VBA.html
Dort w...
23.10.2018 09:39:52
Thread-ID: 1652890
6 Beiträge
Termine mit VBA o. Wenn Fkt in Kalender eintragen
Benedikt

Schönen Nachmittag an alle,
ich komme hier leider nicht mehr weiter. Ich habe ein auf einem Tabellenblatt ein VBA Code, indem ich mir aus Outlook sämtliche Termine herausziehe. Im 2 Tabellenblatt (siehe angefügte Datei) filtere ich diese. Das erste Tabellenblatt habe ich aus der Testdatei e...
05.08.2019 15:22:24
Thread-ID: 1705941
2 Beiträge
Anzeige
Geburtstage in Kalender eintragen
Mario
Hallo Profis,

Ich habe eine Tabelle mit Kalenderblatt und Geburtstage und möchte erreichen das die Geburtstage "Name(alter)"in den Kalender eingetragen werden

Das Kalenderblatt "Kalender" ist wiefolgt angelegt, in den Spalten c,f,i,l usw. Zeile 4:34 steht das Datum im format "TT TTT"...
20.11.2003 15:42:57
Thread-ID: 341331
2 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

Feiertage in Excel mit Namen anzeigen

Schritt-für-Schritt-Anleitung

  1. Erstelle eine Legende: Lege ein Blatt namens „Legende und Wegleitung“ an, in dem du die Feiertage in einer Spalte (z.B. Spalte G) und die dazugehörigen Namen in der danebenliegenden Spalte (z.B. Spalte H) einträgst.

  2. Bedingte Formatierung: Markiere die Feiertage in deinem Dienstplan mit einer bedingten Formatierung. Verwende die Formel:

    =ODER(REST(D$1;7)=1;ZÄHLENWENN(FT;D$1)>0)

    Diese sorgt dafür, dass die Feiertage rot eingefärbt werden.

  3. Namen der Feiertage einfügen: In der Zeile, in der du die Namen der Feiertage anzeigen möchtest (z.B. Zeile 3), benutze die folgende Formel:

    =SVERWEIS(D2; 'Legende und Wegleitung'!$G$6:$H$17; 2; 0)

    Diese Formel sucht den Namen des Feiertags basierend auf dem Datum in D2.

  4. Fehlerbehandlung: Um Fehler wie #NV zu vermeiden, erweitere die Formel mit einer Fehlerbehandlung:

    =WENNFEHLER(SVERWEIS(D2; 'Legende und Wegleitung'!$G$6:$H$17; 2; 0); "")

  5. Zellenformatierung: Wenn der Text in den Zellen nicht vollständig angezeigt wird, kannst du die Zellen verbreitern oder die Schriftgröße reduzieren. Alternativ kannst du das Zahlenformat auf ;;; "FT" setzen, um nur den Text anzuzeigen.

Häufige Fehler und Lösungen

  • #NV Fehler: Dieser Fehler tritt auf, wenn kein Feiertag für das entsprechende Datum gefunden wird. Verwende die WENNFEHLER-Funktion, um diesen Fehler zu vermeiden.

  • Text wird abgeschnitten: Wenn der Name des Feiertags nicht vollständig angezeigt wird, überprüfe die Zellengröße und die Schriftgröße. Eine andere Möglichkeit ist, die Zellen zu verbinden, um mehr Platz zu schaffen.

  • Bedingte Formatierung funktioniert nicht: Stelle sicher, dass die Bereiche korrekt definiert sind und die Formel für die bedingte Formatierung richtig eingegeben wurde.

Alternative Methoden

  • VBA-Makro: Du kannst ein einfaches VBA-Makro verwenden, um die Feiertage automatisch in deinen Dienstplan einzufügen. Verwende den folgenden Code: 
    Sub ft_kopieren()
   Dim c As Range
   Dim monat As String, tag As Integer
   With Sheets("Legende und Wegleitung")
       For Each c In .Range("G6:G17")
           monat = Format(c, "MMMM")
           tag = Day(c)
           Sheets(monat).Cells(3, tag + 3).Value = c.Offset(0, 1).Value
       Next
   End With
End Sub

    Dieses Makro trägt die Feiertage automatisch in das entsprechende Monatsblatt ein.

Praktische Beispiele

  • Feiertage in Excel eintragen: Angenommen, du hast folgende Feiertage in deiner Legende: Datum Feiertag
    01.01.2023 Neujahr
    25.12.2023 Weihnachten

    In deinem Dienstplan wird der Feiertag „Neujahr“ in der Zelle D3 angezeigt, wenn der 01.01.2023 in D2 steht.

  • Bedingte Formatierung für Feiertage: Wenn der 03.10.2023 (Tag der Deutschen Einheit) in deinem Dienstplan erscheint, wird die gesamte Zeile rot markiert, um den Feiertag zu kennzeichnen.

Tipps für Profis

  • Regelmäßige Aktualisierung: Stelle sicher, dass die Feiertagsliste in deiner Legende regelmäßig aktualisiert wird, um die richtigen Daten anzuzeigen.

  • Verwende Tabellen: Nutze Excel-Tabellen für die Legende, um die Daten dynamisch und einfach zu verwalten.

  • Automatisierung: Du kannst auch Bedingungen in deine Makros einfügen, um Feiertage automatisch zu erkennen und einzutragen, wenn neue Daten hinzugefügt werden.

FAQ: Häufige Fragen

1. Wie kann ich Feiertage automatisch in Excel eintragen? Du kannst Feiertage automatisch eintragen, indem du die SVERWEIS-Funktion oder ein VBA-Makro verwendest, wie im Tutorial beschrieben.

2. Wie kann ich die Feiertage in meiner Tabelle markieren? Verwende die bedingte Formatierung, um die Feiertage in deiner Tabelle farbig zu markieren. Definiere die Bedingungen basierend auf deiner Feiertagsliste.

3. Was tun, wenn der Name des Feiertags nicht richtig angezeigt wird? Prüfe die Zellgrößen und die Formeln auf Fehler. Du kannst auch das Zahlenformat anpassen oder die Zellen verbreitern.

4. Kann ich Feiertage für mehrere Jahre verwalten? Ja, du kannst deine Legende erweitern, um Feiertage für mehrere Jahre zu verwalten. Achte darauf, die Formeln entsprechend anzupassen.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige