/ / Excel VBA Optionsschaltflächen

Excel VBA Optionsschaltflächen

Wenn Sie mehr als eine Optionsschaltfläche haben, kann nur eine der Optionsschaltflächen ausgewählt werden. Erschaffen Optionsfelder im Excel VBAFühren Sie die folgenden Schritte aus.

1. Klicken Sie auf der Registerkarte Entwickler auf Einfügen.

2. Klicken Sie in der Gruppe ActiveX-Steuerelemente auf Optionstaste.

Erstellen Sie eine Optionsschaltfläche in Excel VBA

3. Ziehen Sie zwei Optionsschaltflächen in Ihrem Arbeitsblatt.

4. Klicken Sie mit der rechten Maustaste auf die erste Optionsschaltfläche (stellen Sie sicher, dass Design Mode ausgewählt ist).

5. Klicken Sie auf Code anzeigen.

Code anzeigen

Hinweis: Sie können die Beschriftung und den Namen eines Steuerelements ändern, indem Sie mit der rechten Maustaste auf das Steuerelement klicken (stellen Sie sicher, dass Entwurfsmodus ausgewählt ist) und dann auf Eigenschaften klicken. Ändern Sie die Beschriftungen der Optionsfelder auf weiblich und männlich. Für den Moment werden wir OptionButton1 und OptionButton2 als Namen der Optionsfelder belassen.

6. Fügen Sie die folgende Codezeile hinzu:

If OptionButton1.Value = True Then Range("D3").Value = 10

7. Klicken Sie mit der rechten Maustaste auf die zweite Optionsschaltfläche (stellen Sie sicher, dass Design Mode ausgewählt ist).

8. Klicken Sie auf Code anzeigen.

9. Fügen Sie die folgende Codezeile hinzu:

If OptionButton2.Value = True Then Range("D3").Value = 20

10. Klicken Sie auf die Optionsschaltflächen auf dem Blatt (stellen Sie sicher, dass Design Mode deaktiviert ist).

Ergebnis:

Optionsfeld 1 Wahr

Optionsschaltfläche 2 Wahr

In einigen Situationen kann es zwar nützlich sein, Optionsfelder direkt in Ihrem Arbeitsblatt zu platzieren, aber Optionsfelder sind besonders nützlich, wenn sie auf einem Benutzerformular platziert werden.

Lesen Sie auch: