VBA – Programmierung mit Excel Grundlagen

Selbstdefinierte Dialoge - UserForm
12.7.3 Beispiel 3
Das nachfolgende Beispiel für die Anwendung von USERFORMS ist etwas umfangreicher,
aber dennoch einfach in der Programmstruktur. Auch hier wird wiederum kein Wert auf
komplizierte profesionelle Programmierung gelegt; die Anweisungen sollen einfach und
verständlich sein.
Das zugrundeliegende Programm soll die folgenden Aufgaben erfüllen:
• Über eine USERFORM mit dem folgenden Design:
sollen in ein Tabellenblatt Buchungssätze eingetragen werden. Dabei sind folgende
Bedingungen zu erfüllen:
• Die Reiseziele, Preise pro Person und Reiseziel sowie Personenzahl sollen aus
ComboBoxen entnommen werden können. Diese sollen nach dem Laden des Formulars
gefüllt zur Verfügung stehen. Die Daten stehen in einem eigenen Tabellenblatt mit dem
Namen Daten.
• Die Buchungsnummer soll um 1 höher sein als die höchste im Tabellenblatt eingetragene.
Auch sie soll nach dem Laden des Formulars schon im Feld erscheinen.
• Das Feld Datum soll nach dem Laden das aktuelle Tagesdatum enthalten.
• Die übrigen Felder sollen nach dem Laden leer sein.
• Die Schaltflächen Buchen und Löschen sollen nach dem Laden der Form nicht sichtbar
sein, sie sollen erst dann erscheinen, wenn der Gesamtpreis über die Schaltfläche
Berechnen errechnet wurde.
• Für eine Buchung kann ein fester Rabatt vergeben werden, wenn die CHECKBOX
Buchungsinfo aktiv ist. Der Betrag soll ausgerechnet werden, im Tabellenblatt soll ein
Hinweis auf Rabatt eingetragen werden.
• Die Schaltfläche Intern soll die Gesamtsumme aller Gesamtpreise im Tabellenblatt in
einer eigenen UserForm anzeigen:
allerdings geschützt durch ein Password.
Abbildung 47: UserForm des Beispiels 3
Abbildung 48: UserForm mit
Password - Abfrage
Seite 109