Getagged: Kalender

Feiertage NRW von 2017 bis 2020

 

Hallo,

in meiner aktuellen Videoreihe zur Jahresübersicht nutzte ich eine Liste von Feiertagen und Ferienzeiten. In meinem Fall für NRW.

Wer die Übungen nachvollziehen möchte, kann auf die folgenden Feiertage (ohne Gewähr) zurückgreifen und diese eventuell sogar mit Power Query auslesen.

Es gibt auch sicher andere Quellen im Netz dafür.

Hier die Feiertage und anderen Ereignisse als Tabelle:

 

Datum Ereignis gesetzlich
01.01.2017 Neujahr ja
27.02.2017 Rosenmontag
14.04.2017 Karfreitag ja
16.04.2017 Ostersonntag ja
17.04.2017 Ostermontag ja
01.05.2017 1. Mai ja
25.05.2017 Christi Himmelfahrt ja
04.06.2017 Pfingstsonntag ja
05.06.2017 Pfingstmontag ja
15.06.2017 Fronleichnam ja
03.10.2017 Tag der Deutschen Einheit ja
31.10.2017 Reformationstag ja
01.11.2017 Allerheiligen ja
24.12.2017 Heiligabend
25.12.2017 1. Weihnachtstag ja
26.12.2017 2. Weihnachtstag ja
31.12.2017 Silvester
01.01.2018 Neujahr ja
12.02.2018 Rosenmontag
30.03.2018 Karfreitag ja
01.04.2018 Ostersonntag ja
02.04.2018 Ostermontag ja
01.05.2018 Maifeiertag ja
10.05.2018 Christi Himmelfahrt ja
20.05.2018 Pfingstsonntag ja
21.05.2018 Pfingstmontag ja
31.05.2018 Fronleichnam ja
03.10.2018 Tag der Deutschen Einheit ja
01.11.2018 Allerheiligen ja
24.12.2018 Heiligabend
25.12.2018 1. Weihnachtstag ja
26.12.2018 2. Weihnachtstag ja
31.12.2018 Silvester
01.01.2019 Neujahr ja
04.03.2019 Rosenmontag
19.04.2019 Karfreitag ja
21.04.2019 Ostersonntag ja
22.04.2019 Ostermontag ja
01.05.2019 Maifeiertag ja
30.05.2019 Christi Himmelfahrt ja
09.06.2019 Pfingstsonntag ja
10.06.2019 Pfingstmontag ja
20.06.2019 Fronleichnam ja
03.10.2019 Tag der Deutschen Einheit ja
01.11.2019 Allerheiligen ja
24.12.2019 Heiligabend
25.12.2019 1. Weihnachtstag ja
26.12.2019 2. Weihnachtstag ja
31.12.2019 Silvester
01.01.2020 Neujahr ja
24.02.2020 Rosenmontag
10.04.2020 Karfreitag ja
12.04.2020 Ostersonntag ja
13.04.2020 Ostermontag ja
01.05.2020 Maifeiertag ja
21.05.2020 Christi Himmelfahrt ja
31.05.2020 Pfingstsonntag ja
01.06.2020 Pfingstmontag ja
11.06.2020 Fronleichnam ja
03.10.2020 Tag der Deutschen Einheit ja
01.11.2020 Allerheiligen ja
24.12.2020 Heiligabend
25.12.2020 1. Weihnachtstag ja
26.12.2020 2. Weihnachtstag ja
31.12.2020 Silvester
15.02.2021 Rosenmontag
28.02.2022 Rosenmontag
20.02.2023 Rosenmontag
12.02.2024 Rosenmontag

 

Anbei die bisherigen Videotitel:

Videolink zur Preview: https://www.youtube.com/watch?v=6Ou1SD6dAkg

Videolink zu Teil 1: https://www.youtube.com/watch?v=O9nz1yVqeLA

Videolink zu Teil 2: https://www.youtube.com/watch?v=mV4QNy1IXdM

Stickbesitzer können die Dateien auch aus den Verzeichnissen E808 bis E810 ziehen und die Übungen direkt parallel zu den Videos nachvollziehen.

Besten Dank für das Super-Feedback zu diesen Videos. Würde mich freuen, wenn Ihr die Titel Euren Kollegen weiterempfehlt.

Sonnige Grüße
Andreas

Excel – Projektkalender

In einem Kalender soll der ausgewählte Projektzeitraum visualisiert werden.

Die Projekttage sind nachfolgend gelb dargestellt. Arbeitsfreie Zeiten grau und Feiertage Orange.
Zusätzlich heben sich die einzelnen Monate von einander ab.

PK1

Excel – Projektkalender – Preview https://youtu.be/WGvI6GPeuRM
Excel – Projektkalender – Feiertage aus Outlook übernehmen – Teil 1 https://youtu.be/ABMvbA4RadM
Excel – Projektkalender – Arbeitstage auswählen – Teil 2 https://youtu.be/bvwCsOW8te4
Excel – Projektkalender – Kalender dynamisch aufbauen – Teil 3 https://youtu.be/X3EBCXgpTY8
Excel – Projektkalender – Bedingte Formatierung – Monatslinien – Teil 4 http://youtu.be/fWODm5wPydM
Excel – Projektkalender – Bedingte Formatierung – Projekttage – Teil 5 http://youtu.be/mronPMZiHD0
Excel – Projektkalender – VBA – Feiertage ausblenden – Teil 6 http://youtu.be/_8N5fBiz84M
Excel – Projektkalender – Bedingte Formatierung – Monate abwechselnd einfärben – Teil 7 https://youtu.be/K5x4shLNsts
Excel – Projektkalender – Bedingte Formatierung – Ferientage – Teil 8 https://youtu.be/CscxikTm0qU

Hier ist der VBA-Teil:

Option Explicit

Sub Ellipse1_Klicken()

With ActiveSheet
.Protect DrawingObjects:=False, Contents:=False
If .Shapes(„Oval 1“).TextFrame2.TextRange.Characters.Text = „>“ Then
.Columns(„A:G“).EntireColumn.Hidden = False
.Columns(„U:Z“).EntireColumn.Hidden = False
.Shapes(„Oval 1“).TextFrame2.TextRange.Characters.Text = „<“

Else

.Columns(„A:G“).EntireColumn.Hidden = True
.Columns(„U:Z“).EntireColumn.Hidden = True
.Shapes(„Oval 1“).TextFrame2.TextRange.Characters.Text = „>“

End If

.Range(„I1“).Select
.Protect DrawingObjects:=True, Contents:=True
End With

End Sub

Microsoft Project – Ausnahmen für Kalender per VBA aus Excel importieren

In den jeweiligen Kalendern von Project können Ausnahmen für arbeitsfreie Tage eingetragen werden. Liegt eine Liste mit diesen Ausnahmen in Excel vor, kann diese nicht einfach per Copy und Paste in ihrer Gesamtheit kopiert werden. Schade.

p01

Damit Project auf Excel im VBA zugreifen kann, muss in Extras – Verweise der Zugriff auf Microsoft Excel gewährt werden. Zunächst mit ALT + F11 den VBA-Editor öffnen, dann den Zugriff gewähren.

p11

Anschließend den unten stehenden Code in ein neues Modul kopieren und den Pfad zur Datei anpassen.

Folgender VBA-Code öffnet zunächst eine Excel-Datei und liest anschließend Zeilenweise die Daten der jeweiligen Ausnahmen in die Ausnahmeliste des Kalenders „Standard“:

Sub Feiertage_Importieren()
Dim xlApp As Excel.Application
Dim xlWkb As Workbook
Dim i As Long
Dim Bezeichnung As String
Dim Startdatum As Date
Dim Enddatum As Date

Set xlApp = CreateObject("Excel.Application")
Set xlWkb = xlApp.Workbooks.Open("C:\Users\Andreas\Desktop\KalenderStandard.xlsx")

i = 2

With xlWkb.Sheets("Feiertage")
Do Until .Cells(i, 1).Value = ""

Bezeichnung = .Cells(i, 1).Value
Startdatum = .Cells(i, 2).Value
Enddatum = .Cells(i, 3).Value

ActiveProject.BaseCalendars("Standard").Exceptions.Add Type:=1, Name:=Bezeichnung, Start:=Startdatum, Finish:=Enddatum

i = i + 1
Loop
End With

xlWkb.Close
Set xlWkb = Nothing
Set xlApp = Nothing
End Sub

Achtung: Das Makro beinhaltet noch keine Fehlerprozeduren und prüft nicht, ob die Termine eventuell schon vorhanden sind.

Nun kann das Makro z.B. mit Alt + F8 ausgeführt werden.
Unter Projekt – Arbeitszeit ändern lassen sich die neuen Ausnahmen einsehen.

p21

Videolink:

Link zum Video bei YouTube: http://youtu.be/3advDEF3iyo

Excel – PowerPivot – Kalendertabelle für alle Auswertungen

Ein gut gepflegter Kalender sollte mit den Datentabellen verknüpft sein. Zudem ist die Kalendertabelle als Datumstabelle zu markieren und die Sortierreihenfolge für Monate und Wochentage festzulegen.

Welche Informationen sollte eine Kalendertabelle tragen? Im Prinzip alle Informationen, die Sie später auch auswerten möchten.

Hier ein paar Vorschläge

  • Datum
  • Jahr
  • Monat in Zahlen
  • Monat ausgeschrieben
  • Tag des Monats
  • Wochentag als Zahl
  • Wochentag ausgeschrieben
  • Information zum Wochenende
  • Kalenderwoche
  • Quartal
  • Geschäftsjahr
  • Jahr und Quartal
  • Jahr und Monat
  • Anzahl Tage des Monats
  • Die Kalendertabelle aus dem Video zum Download:
    Kalender PowerPivot

    Hier ist das Video:

    Videolink: http://youtu.be/FXf0wI4RQfs