Hajo's Excelzeiten mit einer umfangreiche Beispielsammlung zum kostenfreien Download. 
			Sowohl Formellösungen als auch Beispiele für die Makroprogrammierung in Excel.
Home
VBA Beispiele

  Allgemein
  Bilder einfügen
  blinkender Zellinhalt
  Counter
  Datei schließen
  Dateikopie
  Dateiverwaltung
  Datensätze umschreiben
  Datum / Zeit
  DropDown-Listenfeld
  Drucken
  Ersatz bedingte Formatierung
  Füllfarbe
  Kontextmenü
  Markieren
  nur mit Makros
  Sound
  Stoppuhr
  Symbolleiste Formular
  Symbolleiste vor 2007
  Symbolleiste ab 2007
  UserForm
       Allgemein
       Auswahlliste
       Datum Zeit
       Kalender
       Klassen Programmierung
       ListBox keine Doppelten

ohne VBA Beispiele
fremde Dateien
Hinweise zu Excel ab Version 2007
Übersicht Downloads
Bilder
Kontakt
Favoriten
Mein Heim-Forum
Tools Tabelle Forum
Impressum
Copyright
Disclaimer

letzte Bearbeitung 24.06.17

Valid XHTML 1.0 Strict CSS ist valide!
Bing
Suchmaschinenoptimierung mit Ranking-Hits

VBA Beispiele Seite UserForm Kalender
Die Arbeitsmappen wurden unter Betriebssystem XP mit Excelversion 2003, Betriebssystem Vista Ultimate mit Excelversion 2007,  Windows 7 mit Excelversion 2010 und Windows 8 mit Excelversion 2013, Windows 10 mit Excelversion 2016 getestet.
Hinweis: generell wurde mit Excel-Version 32 Bit getestet, nur wenige Beispiele unter 64 Bit. Bei auftretenden Problemen bitte eine Mail an die im Impressum aufgeführte Mailadresse

UserForm02
Kalenderersatz

Einige Beispiele zur Eingabe von Datum und Uhrzeit mittels ComboBox:
  Beispiel 01: Auswahl von Tag, Monat und Jahr
  Beispiel 02: Auswahl von Kalenderwoche mit Anzeige des Datums von Montag und Sonntag
  Beispiel 03: Auswahl von Stunde und Minute

Änderung:
01. 26.03.06 Kommentare in der Tabelle ergänzt
02. 01.05.06 Code komplett überarbeitet für Beispiel 1 und 2
03. 28.04.07 Arbeitsmappe für Version 2007 ergänzt
03. 19.12.13 Laufzeitfehler beseitigt

Stand 19.12.13

UserForm03
Eingabe Datum

Einige Beispiele zur Eingabe von Datum, Kalenderwoche und Zeit in TextBoxen:
  Beispiel 01: Eingabe von Datum ohne Punkte und Anzeige der Kalenderwoche
  Beispiel 02: Eingabe der Kalenderwoche und Anzeige des Datums von Montag
  Beispiel 03: Eingabe von Zeit ohne Doppelpunkt

Änderung:
01. 08.04.06 Kommentare in der Tabelle ergänzt
02. 07.05.06 Kommentare im Code ergänzt
03. 13.05.06 Beispiel 3 ergänzt
04. 28.08.07 Fehler bei Ermittlung von Montag beseitigt, falls 31.12 die 1. Kalenderwoche ist
05. 28.04.07 Arbeitsmappe für Version 2007 ergänzt
06. 09.12.07 bei falscher Eingabe wird der Focus wieder auf das selbe Steuerelement gesetzt
07. 08.08.09 Code überarbeitet

Stand 20.04.16

UserForm40
Eingabe Datum in TextBox

In einer TextBox soll das Datum in Form JJJJMMTT eingegeben werden.
Nach der letzten Zahl erfolgt eine Prüfung ob Datum, falls nicht wird die letzte Eingabe gelöscht.
Es können nur Daten eingegeben werden die Excel kennt.

Stand 29.12.15

UserForm04
Kalender
ab Version 1997
Highslide JS

Bei Selektion von im Code festgelegten Zellen erscheint eine UserForm mit Kalender. Das ausgewählte Datum wird in die Zelle eingetragen. Feiertage in Tabelle.

Änderung:
01. Kalender auf das aktuelle Datum stellen
02. 07.05.06 UserForm_Initialize geändert in UserForm_Activate
03. 28.04.07 Arbeitsmappe für Version 2007 ergänzt
04. 28.01.09 Bedienung mittels Tastatur möglich
05. 23.08.10 Kommentar in Tabelle überarbeitet, Version 2010
06. 04.11.10 Kalender auf Wochenbeginn Montag umgestellt
07. 28.11.11 Kalender ab Version 1997 eingebaut
08. 14.10.11 Kennzeichnung aktuelles Datum
09. 13.10.10 Auswahl Kalenderwoche
10. 16.08.10 Code überarbeitet für Target.Count ab 2007
11. 20.02.13 Code geändert, falls Zelle mit Datum ausgewählt
12. 21.02.13 in der Tabelle kann ein Vorgabetag für leere Zellen im Bereich festgelegt werden
13. 24.02.13 Fehler in der Anzeige Jahr beseitigt, Datum aus Tabelle markiert
14. 24.02.13 Markierung aktueller Tag bei keiner Vorgabe
15. 03.09.13 Anzeige Feiertage Fehler beseitigt
16. 03.09.13 Auswahl Kalenderwoche, Eintrag in Zelle geändert
17. 03.09.13 Auswahl Kalenderwoche in Zelle ergänzt
18. 03.09.13 Tabelle Geburtstag, absolut Bezug zum Jahr
19. 03.09.13 Berechnung bei Änderung, Jahr und Monat
20. 24.02.13 Markierung aktueller Tag bei keiner Vorgabe

Stand 03.09.13

UserForm19
Kalender ab Version 1997
Highslide JS

In einer UserForm wird ein Kalender dargestellt. Die Darstellung erfolgt einschl. Kalenderwoche nach DIN 1355. Bei Wochenenden im aktuellen Monat werden mit Schriftfarbe Rot gekennzeichnet. Im Code sind die Feiertage hinterlegt und müssen je nach Bundesland angepasst werden. Feiertage werden mit Hintergrundfarbe Grün gekennzeichnet. Feiertage werden im unteren Teil der UserForm aufgelistet. Im Kalender kann über ComboBoxen der Monat und das Jahr ausgewählt werden.
Wird ein Tag im aktuellen Monat angeklickt, wird das Datum in eine Zelle geschrieben.
Bei Klick auf einen Tag, der nicht im aktuellen Monat liegt, wird der betreffende Monat eingestellt.
Navigation mittels ScrollBar: 1. Weiterschalten Monatsweise per Pfeil-Tasten, 2. Weiterschalten Jahresweise per Klick in die ScrollBar.

Feiertage im Code.

Änderung:
01. 21.08.111 Datum in Zelle schreiben
02. 14.10.11 Kennzeichnung aktuelles Datum
03. 13.10.10 Auswahl Kalenderwoche
04. 23.11.13 Zellformat bei Tag
05. 16.12.14 Feiertage nur im aktuellen Monat, ergänzt und auskommentiert

Stand 23.11.13

UserForm33
Kalender
ab Version 1997
Highslide JS

Bei Selektion von im Code festgelegten Zellen erscheint eine UserForm mit Kalender.
Wird eine Zelle mit einem Datum ausgewählt, wird im Kalender der Monat angezeigt und das Datum ist markiert.
Bei einer leeren Zelle wird der Monat von dem in der Tabelle festgelegten Vorgabetag angezeigt.
In der Arbeitsmappe gibt es eine Tabelle für die Berechnung der Feiertage, Eigene Termine und Geburtstage. Diese Termine werden mit Farben im Kalender gekennzeichnet und unten aufgeführt.
Das ausgewählte Datum wird in die Zelle eingetragen. Feiertage in Tabelle.

Änderung:
01. 24.02.13 Geburtstage
02. 03.09.13 Auswahl Kalenderwoche, Eintrag in Zelle geändert
03. 03.09.13 Auswahl Kalenderwoche in Zelle ergänzt
04. 03.09.13 Tabelle Geburtstag, absolut Bezug zum Jahr
05. 03.09.13 Berechnung bei Änderung, Jahr und Monat
06. 24.02.13 Markierung aktueller Tag bei keiner Vorgabe
07. 04.04.15 Grund bei eigenen Termin in UserForm ergänzt

Stand 04.04.15

UserForm34
Kalender
ab Version 1997
Highslide JS

In einer UserForm sind mehrere TextBoxen vorhanden. Mit Doppelklick wird der Kalender aufgerufen und das ausgewählte Datum wird in die TextBox eingetragen. Feiertage in Tabelle.

Änderung:
01. 16.08.13 TextBox auf Frame
02. 03.09.13 Auswahl Kalenderwoche, Eintrag in Zelle geändert
03. 03.09.13 Auswahl Kalenderwoche in Zelle ergänzt
04. 03.09.13 Tabelle Geburtstag, absolut Bezug zum Jahr
05. 03.09.13 Berechnung bei Änderung, Jahr und Monat
06. 24.02.13 Markierung aktueller Tag bei keiner Vorgabe
07. 19.01.14 UserForm Kalender kann aus mehreren UserFormen der Datei aufgerufen werden

Stand 19.01.14

UserForm35
Kalender in Tabelle

In dieser Arbeitsmappe wird ein Kalender für ein Jahr erstellt.
Es werden die Ferientage markiert und selbst definierte, jährlich wiederkehrende Termine (z.B. Geburtstage) sowie Termine, die nur im aktuellen Jahr Gültigkeit haben.
Die Abfrage des Jahres erfolgt über eine UserForm, dort kann ebenfalls das Bundesland ausgewählt werden.

Stand 20.11.14

UserForm37
Kalender
ab Version 1997
Highslide JS

Dies ist ein Beispiel, das auf UserForm33 aufbaut.
Bei Selektion von im Code festgelegten Zellen erscheint eine UserForm mit Kalender.
Wird eine Zelle mit einem Datum ausgewählt, wird im Kalender der Monat angezeigt und das Datum ist markiert. Bei einer leeren Zelle wird der Monat von dem in der Tabelle festgelegten Vorgabetag angezeigt, Bei keiner Vorgabe der aktuelle.
In der Arbeitsmappe gibt es eine Tabelle für die Berechnung der Feiertage, Eigene Termine und Geburtstage. Diese Termine werden mit unterschiedlichen Farben im Kalender gekennzeichnet und unten aufgeführt.
Das ausgewählte Datum wird in die Zelle eingetragen. Feiertage in Tabelle.

Stand 01.01.15

UserForm39
Kalender
ab Version 1997
Highslide JS

Dies ist ein Beispiel, das auf UserForm37 aufbaut.
Bei Selektion von im Code festgelegten Zellen erscheint eine UserForm mit Kalender.
Wird eine Zelle mit einem Datum ausgewählt, wird im Kalender der Monat angezeigt und das Datum ist markiert. Bei einer leeren Zelle wird der Monat von dem in der Tabelle festgelegten Vorgabetag angezeigt, Bei keiner Vorgabe der aktuelle.
In der Arbeitsmappe gibt es eine Tabelle für die Berechnung der Feiertage, Eigene Termine und Geburtstage. Diese Termine werden mit unterschiedlichen Farben im Kalender gekennzeichnet und unten aufgeführt. Bei eigenen Terminen kann ein Datumsbereich angegeben werden.
Das ausgewählte Datum wird in die Zelle eingetragen. Feiertage in Tabelle.

Stand 01.01.15

Dies ist der Link zur der Webseite, die ich als Seite des Diagrammexperten im deutschsprachigen Raum ansehe.

Mein besonderer Dank gilt in diesem Zusammenhang Karin Mohnhaupt, die mich seit September 2005 bei der Erstellung dieser Homepage redaktionell unterstützt. Bei der intensiven Prüfung der Beispielarbeitsmappen hat sie mich auch auf einige Punkte hingewiesen, die ich als Autor als selbstverständlich angesehen hätte, die aber für den normalen User nicht immer nachvollziehbar gewesen wären.