Programm ändern

Ein VBA-Programm ändern

Das bisher erstellte Programm ist eher einfach gestrickt und auch nicht unbedingt sehr funktionell. Das wollen wir ändern. In der „erweiterten“ Version soll das Programm folgenden Anforderungen gerecht werden:

  1. Eingabe von Adressendaten
  2. Eingabe eines Geburtsdatums
  3. Überprüfen von Eingaben und –längen.
  4. Errechnen und Anzeigen des Alters.

Die OK-Schaltfläche bleibt bestehen, nur beendet sie jetzt nicht (direkt) das Programm, sondern startet die Überprüfung der Eingaben, errechnet das Alter und zeigt dieses an. Erst danach wird das Programm beendet.

Das Bezeichnungsfeld lblNow kann gelöscht werden, da wir es nicht mehr benötigen. Gleichzeitig muss auch der zugehörige Code (in der Prozedur UserForm_Activate) entfernt werden, da es sonst zu einem Programmfehler kommt. Wenn nämlich das Bezeichnungsfeld von dem Formular entfernt wurde, führt die Codezeile lblNow.Caption = sQuote & Format(Now, "dddddd, hh:mm") & " Uhr" unweigerlich zu einem Fehler, da hier auf ein Objekt lblNow mit dessen Eigenschaft Caption verweist, die es nicht mehr gibt!



Zurück VBA-Programm Schritt 3 | Inhalt | Programm ändern Schritt 1 Weiter