Wir erstellen ein einfaches VBA-Benutzerformular, in dem wir den Benutzer auffordern, seinen Namen, sein Alter und sein Geschlecht einzugeben. Die Schritte zum Erstellen eines solchen Benutzerformulars sind wie folgt. Gehen Sie im Excel-Arbeitsblatt zur Registerkarte des Entwicklers und klicken Sie auf den Visual Basic-Editor. Klicken Sie nun auf der Registerkarte Einfügen auf Benutzerformular, um ein Benutzerformularfenster zu öffnen. Wir müssen diesem Benutzerformular Schaltflächen hinzufügen, um Eingaben vom Benutzer zu erhalten. Wir können sehen, dass neben unserem Benutzerformular auch eine Toolbox mit den Kontrollschaltflächen geöffnet ist. :||: vba-Wordwelt :||: Grundsätzliches :||: Userform. Diese Toolbox enthält verschiedene Steuerelemente, die in UserForms verwendet werden. Für unser Beispiel benötigen wir also einen Namen, ein Alter und ein Geschlecht, die vom Benutzer eingegeben werden müssen. Grundsätzlich benötigen wir drei Etiketten, die unsere Anweisungen darstellen. Klicken Sie auf Labels. Bewegen Sie den Mauszeiger auf das Benutzerformular und klicken und ziehen Sie, um eine Beschriftung in das Benutzerformular einzufügen.
EXCEL VBA Datenbank erstellen / UserForm Grundlagen: Beispiel einer einfachen Datenbank - YouTube
04. 20 VBA Beispiele Seite UserForm Auswahlliste 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 aufgefhrte Mailadresse 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. Excel userform beispiele 2018. 01. 10 Code berarbeitet 03. 06. 10 Auswahl bernehmen eingearbeitet Stand 30. 10 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.
Um den Namen zu ändern, benennen Sie die Textbox als Nameva für den Namenwert und als Ageva für das Geschlecht ähnlich wie Genderva für den Geschlechtswert um. Führen Sie das UserForm aus, indem Sie auf die Wiedergabetaste klicken oder die Taste F5 drücken. In das Excel Sheet schreiben muss der Header für die Daten wie folgt eingegeben werden. Beispielformular - Das VBA-Tutorial. Doppelklicken Sie auf die Schaltfläche "Senden", um das Codefenster für die Schaltfläche "Senden" wie folgt zu öffnen. Code: Private Sub CommandButton1_Click () End Sub Deklarieren Sie im Codefenster eine Variable, solange wie unten gezeigt. Code: Private Sub CommandButton1_Click () A als Long-End-Sub abblenden Verschieben wir nun die erste freie Zelle in der ersten Spalte mit dem folgenden Code. Code: Private Sub CommandButton1_Click () A so lange abdunkeln A = Cells (, 1) (xlUp) + 1 End Sub Speichern wir den vom Benutzer angegebenen Wert im Arbeitsblatt mit dem folgenden Code. Code: Private Sub CommandButton1_Click () Dim A As Long A = Zellen (, 1) (xlUp) + 1 Zellen (A, 1) = Cells (A, 2) = Ageva Cells (A, 3) = = "" = "" = "" End Sub Doppelklicken Sie nun auf die Schaltfläche Abbrechen, um den Namen des automatischen Makros anzuzeigen.