So erstellen Sie interaktive Formulare in Excel VBA mit ActiveX-Steuerelementen

2. Listenfeld

List Box ist ein Steuerelement, das dazu dient, eine Liste von Auswahlen anzuzeigen, die es dem Benutzer ermöglichen, ein oder mehrere Elemente auszuwählen. Dies ist besonders nützlich in Dateneingabeformularen oder für die Navigation zwischen Seiten in Anwendungen, die Excel VBA verwenden.

So fügen Sie Daten zu einem Listenfeld in Excel VBA hinzu

  1. Öffnen Sie die  Registerkarte Developer in Excel.
  2. Wählen Sie Insert > List Box (ActiveX Controls).
  3. Klicken und ziehen Sie, um die List Box auf dem Arbeitsblatt zu platzieren.
  4. Klicken Sie mit der rechten Maustaste auf List Box > Properties.

Beispiel für VBA-Code zum Hinzufügen von Elementen zum Listenfeld

Verwenden Sie den folgenden VBA-Code, um dem List Box mehrere Städtenamen hinzuzufügen:

With Sheet1.ListBox1
    .AddItem  “Jakarta”
    .AddItem “Surabaya”
    .AddItem “Bandung”
End With

Dieser Code kann in Workbook_Open Ereignis eingefügt werden, so dass die Daten beim Öffnen der Datei automatisch geladen werden.

Verbinden von Listboxen mit Zellen in Excel

Um die ausgewählten Elemente aus dem List Box in einer bestimmten Zelle anzuzeigen, führen Sie die folgenden Schritte aus:

  1. Klicken Sie mit der rechten Maustaste auf List Box und wählen Sie dann Properties.
  2. Suchen Sie die Eigenschaft LinkedCell, und geben Sie dann die Zellenadresse ein (z. B. D3).
  3. Wenn der Benutzer nun ein Element in der List Box auswählt, wird der Wert in der Zelle D3 angezeigt.

Wenn Sie den ausgewählten Wert mithilfe von VBA abrufen möchten, verwenden Sie den folgenden Code:

Range(“D3”).Value =  ListBox1.Value

3. Combo-Box

Combo Box ist ein ActiveX Steuerelement in Excel VBA, das als Liste von Optionen dient, die nach unten gezogen werden können. Benutzer können ein einzelnes Element aus der Liste auswählen oder ihren Text eingeben. Ein Combo Box wird häufig in Eingabeformularen verwendet, um Fehler bei der Dateneingabe zu minimieren, da der Benutzer nur aus den bereitgestellten Optionen wählen kann.

Hinzufügen dynamischer Daten zu einem Kombinationsfeld

Gehen Sie folgendermaßen vor, um einem Arbeitsblatt eine Combo Box hinzuzufügen:

  1. Öffnen Sie Excel, und stellen Sie sicher, dass die Registerkarte Developer aktiviert ist.
  2. Klicken Sie auf Developer > Insert > Combo Box (ActiveX Controls).
  3. Klicken und ziehen Sie, um Combo Box im Arbeitsblatt zu zeichnen.
  4. Klicken Sie mit der rechten Maustaste auf Combo Box und wählen Sie dann Properties aus.

VBA-Beispielcode zum dynamischen Hinzufügen von Elementen zu einem Kombinationsfeld

Verwenden Sie den folgenden Code, um dem Combo Box automatisch Elemente hinzuzufügen, wenn die Arbeitsmappe geöffnet oder auf die Schaltfläche geklickt wird:

ComboBox.Add  Item “Option 1”
ComboBox1.Add Item “Option 2”
ComboBox1.Add Item “Option 3”

Verbinden von Kombinationsfeldern mit Zellen in Excel

Um den ausgewählten Wert im Combo Box in einer bestimmten Zelle zu speichern, führen Sie die folgenden Schritte aus:

  1. Klicken Sie mit der rechten Maustaste auf Combo Box und wählen Sie dann Properties aus.
  2. Suchen Sie die Eigenschaft LinkedCell, und geben Sie dann die Zellenadresse ein (z. B. D3).
  3. Wenn der Benutzer nun ein Element in der Combo Box auswählt, wird dieser Wert in der Zelle D3 angezeigt.

Alternativ können Sie den folgenden VBA-Code verwenden, um den Wert der Option in der Zelle zu speichern:

Range(“D3”).Value  ComboBox1.Value

Weitere interessante Artikel

4. Kontrollkästchen

Check Box ist ein Steuerelement, mit dem der Benutzer die Option Ya/Tidak oder True/False auswählen kann. Dies ist nützlich für binäre Eingaben wie die Bestätigung der Einwilligung, die Auswahl von Funktionen oder das Aktivieren/Deaktivieren einer Funktion in einem Formular.

Verwenden des Kontrollkästchens zum Speichern von Wahr/Falsch-Werten

Gehen Sie folgendermaßen vor, um eine Check Box in Excel VBA hinzuzufügen:

  1. Öffnen Sie die  Registerkarte Developer in Excel.
  2. Klicken Sie auf Insert > Check Box (ActiveX Controls).
  3. Klicken und ziehen Sie, um die Check Box auf dem Arbeitsblatt zu platzieren.
  4. Klicken Sie mit der rechten Maustaste auf Check Box > Properties.

Beispiel für VBA-Code zum Verbinden eines Kontrollkästchens mit einer Zelle

Verwenden Sie für Check Box zum Speichern von Werten in Zellen basierend auf ihrem Status den folgenden Code:

If CheckBox1.Value  =True Then
    Range(“D2”).Value  1
Else
    Range(“D2”).Value = 0
End If

Dieser Code füllt D2 Zellen mit 1, wenn das Check Box aktiviert ist, und 0, wenn es nicht aktiviert ist.

Damit diese Funktion automatisch ausgeführt wird, wenn der Benutzer auf Check Box klickt, verwenden Sie event Change im VBA Editor:

Neueste Artikel

Verwandte Artikel