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 2007
UserForm
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 22.04.12
VBA Beispiele Seite UserForm
Die Arbeitsmappen wurden unter Betriebssystem XP SP3 mit Excelversion 2003 SP3
sowie unter Betriebssystem Vista
Ultimate SP 2 mit Excelversion 2007 SP2 und Windows 7 SP1 mit Excelversion 2010
SP1 getestet.
UserForm01
ComboBox abhängig
Entsprechend der Auswahl in ComboBox1 wird die ComboBox2 gefüllt.
Änderung:
01. bei Auswahl eines bestimmten Begriffes in ComboBox1 wird ComboBox3 eingeblendet
02. 26.03.06 Kommentare im Code ergänzt und überarbeitet
03. 01.02.07 nur Vorgabewerte
04 28.04.07 Arbeitsmappe für Version 2007 ergänzt
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
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
UserForm04
Kalender
ab Version 1997
Bei Selektion von im Code festgelegten Zellen erscheint eine UserForm mit Kalender. Das ausgewählte Datum wird in die Zelle eingetragen.
Ä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
UserForm05
ListBox keine Doppelten, sortiert
Die ListBox einer UserForm wird mit Werten aus Spalte A der Tabelle gefüllt. Es werden keine doppelten Werte eingetragen. Die Anzeige erfolgt in aufsteigender Sortierreihenfolge.
Änderung:
01. 13.05.06 Kommentare im Code ergänzt
02. 13.05.06 Sortierreihenfolge geändert
03. 28.04.07 Arbeitsmappe für Version 2007 ergänzt
UserForm06
ListBox keine Doppelten, unsortiert
Die ListBox einer UserForm wird mit Werten aus Spalte A der Tabelle gefüllt. Es werden keine doppelten Werte eingetragen. Die Anzeige erfolgt unsortiert. Bei Auswahl in der ListBox wird in einer MsgBox die Nummer der Zeile angezeigt, in welcher der Wert das 1. Mal steht.
Änderung:
01. 28.04.07 Arbeitsmappe für Version 2007 ergänzt
UserForm07
Klassenprogrammierung
Ein Beispiel für fortgeschrittene VBA-Programmierung.
Einige Aktionen für die UserForm:
- Daten einlesen
- Daten in die Tabellen übertragen
- Steuerelemente leeren
- Steuerelemente nach Typ auflisten
- Steuerelemente sortiert auflisten
Änderung:
01. 13.05.06 Code komplett überarbeitet
02. 28.04.07 Arbeitsmappe für Version 2007 ergänzt
03. 05.08.10 Kommentare in der Tabelle und im Code überarbeitet
UserForm08
im bestimmten Bereich
Bei Auswahl einer Zelle in den im Code festgelegten Bereichen wird eine UserForm angezeigt.
Änderung:
01. 13.05.06 Kommentare im Code ergänzt
02. 28.04.07 Arbeitsmappe für Version 2007 ergänzt
03. 23.08.10 Code überarbeitet
04. 22.04.12 Target.Count im Code überarbeitet
UserForm09
TextBox Multilinie
Der Focus steht auf TextBox1. Nach Eingabe und Enter wird ein Zeilenumbruch eingefügt. Nach nochmaligem Enter wird
in TextBox2 gewechselt.
Beispiel 01: Einfügen Enter in der TextBox mittels Code
Beispiel 02: Eigenschaft EnterKeyBehavior auf True gesetzt
Änderung:
01. 13.05.06 Kommentare im Code ergänzt
02. 21.10.06 TextBox mit Zeilenumbruch in Zelle schreiben
03. 28.04.07 Arbeitsmappe für Version 2007 ergänzt
04. 05.08.09 Code überarbeitet
05. 20.02.12 Beispiel 02 ergänzt
UserForm10
allmählich größer
UserForm wird sukzessive auf Bildschirmgröße vergrößert. Bei Erreichen des Maximums in Höhe oder Breite erfolgt Zoom auf volle Bildschirmgröße.
Änderung:
01. Code verkürzt
02. Beim Beenden wieder verkleinern
03. Kommentare in der Tabelle geändert
04. 28.04.07 Arbeitsmappe für Version 2007 ergänzt
UserForm11
bei Öffnen
UserForm starten bei Öffnen der Datei durch das Ereignis Workbook_Open:
Beispiel 01: Schließprozedur wird unter Workbook_Open gestartet
Beispiel 02: Schließprozedur in der UserForm
Änderung:
01. 14.05.06 Kommentare in der Tabelle geändert
02. 28.04.07 Arbeitsmappe für Version 2007 ergänzt
UserForm12
Klassen, CheckBox, OptionsButton
Auswertung von OptionButton und CheckBox:
Beispiel 01: OptionButton mittels Klasse auswerten
Beispiel 02: CheckBox mittels Klasse auswerten
Beispiel 03: CheckBox ohne Klasse auswerten
Änderung:
01. 14.05.06 Kommentare in der Tabelle geändert
02. 14.05.06 Kommentare im Code ergänzt
03. 12.10.06 UserForm OptionButton überarbeitet
04. 28.04.07 Arbeitsmappe für Version 2007 ergänzt
05. 02.08.11 Code UserForm OptionButton Klasse überarbeitet
UserForm13
Fortschrittsanzeige
Mittels zweier Laufbalken wird der Fortschritt eines Makros dargestellt. Grundlage für die Realisierung ist eine Schleife.
Änderung:
01. Feststellung letzte Zeile überarbeitet
02. 28.04.07 Arbeitsmappe für Version 2007 ergänzt
03. 06.08.09 Code überarbeitet
UserForm14
Hinweis
Beim Öffnen der Datei werden 3 Makros nacheinander gestartet, mit dem Öffnen wird eine UserForm angezeigt mit dem Hinweis "Bitte warten"
Änderung:
01. 28.04.07 Arbeitsmappe für Version 2007 ergänzt
UserForm15
TextBox Zeilenumbruch
Bei Eingabe in die TextBox wird nach einer im Code festgelegten Anzahl von Zeichen ein Zeilenumbruch eingefügt.
Änderung:
01. 28.04.07 Arbeitsmappe für Version 2007 ergänzt
UserForm16
Auswahlliste anpassen
Bei Eingaben in einer TextBox wird die Vorschlagsliste in einer ListBox angepasst.
Änderung:
01. 16.07.09 Umlaute im Code beachtet
02. 30.01.10 Code überarbeitet
03. 30.06.10 Auswahl übernehmen eingearbeitet
UserForm17
Counter
Bei Öffnen der Arbeitsmappe wird die Counter-Zeit abgefragt (Zeitangabe hh:mm:ss). Diese Zeit wird an eine UserForm übergeben und im Sekundentakt runter gezählt. Nach Ablauf der Zeit wird die UserForm geschlossen.
UserForm18
Auswahlliste anpassen
Klassenprogrammierung
Die in der Arbeitsmappe enthaltene Tabelle dient als Datenbank , wobei jede Datenbankspalte eine Überschrift hat. Entsprechend der Anzahl der Datenbankspalten werden in einer UserForm OptionsButton eingeblendet und die Datenbank in einer ListBox angezeigt. Diese OptionsButton dienen als Auswahl der Spalte, in der ein Begriff gesucht werden soll. Bei Eingaben in einer TextBox wird die Vorschlagsliste in der ListBox angepasst. Es können max. 10 Spalten angezeigt werden.
Änderung:
01. 31.01.10 Beschriftungslabel ergänzt
02. 07.05.10 Beschreibung geändert
UserForm19
Kalender ab Version 1997
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.
Änderung:
01. 21.08.111 Datum in Zelle schreiben
02. 14.10.11 Kennzeichnung aktuelles Datum
UserForm20
OptionsButton dynamisch
In einer UserForm werde OptionsButtion innerhalb eins Frames angezeigt. Die Anzahl der OptionsButton ist abhängig von der Anzahl der Einträge in einer bestimmten Spalte.
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.