Ändern Sie den Wert/Inhalt mehrerer UserForm-Steuerelemente mit VBA in Microsoft Excel

Anonim

In einem Excel 5/95-Dialogblatt ist es möglich, den Wert/Inhalt einer Sammlung von Steuerelementen zu ändern, indem
Durchlaufen der Steuerelemente in der Sammlung, z.B. so: Für jedes cb In dlg.CheckBoxes.
In Excel 97 oder höher gruppiert das UserForm-Objekt die Steuerelemente nicht auf die gleiche Weise.
Nachfolgend finden Sie einige Beispiel-Makros, die zeigen, wie
Sie können den Wert/Inhalt mehrerer UserForm-Steuerelemente ändern:

Sub ResetAllCheckBoxesInUserForm() Dim ctrl als Steuerelement für jedes ctrl in UserForm1.Controls If TypeName(ctrl) = "CheckBox" Then ctrl.Value = False End If Next ctrl End Sub Sub ResetAllOptionButtonsInUserForm() Dim ctrl als Steuerelement für jedes ctrl in UserForm1. Controls If TypeName(ctrl) = "OptionButton" Then ctrl.Value = False End If Next ctrl End Sub Sub ResetAllTextBoxesInUserForm() Dim ctrl als Steuerelement für jedes Strg in UserForm1.Controls If TypeName(ctrl) = "TextBox" Then ctrl.Text = "" End If Next Strg End Sub