Cambiar el valor / contenido de varios UserForm-controles utilizando VBA en Microsoft Excel
En una hoja de diálogo de Excel 5/95, es posible cambiar el valor / contenido de una colección de controles recorriendo los controles de la colección, p. Ej. así: Para cada cb en dlg.CheckBoxes.
En Excel 97 o posterior, el objeto UserForm no agrupa los controles de la misma manera.
A continuación, encontrará algunos ejemplos de macros que muestran cómo puede cambiar el valor / contenido de varios controles de UserForm:
Sub ResetAllCheckBoxesInUserForm() Dim ctrl As Control For Each ctrl In UserForm1.Controls If TypeName(ctrl) = "CheckBox" Then ctrl.Value = False End If Next ctrl End Sub Sub ResetAllOptionButtonsInUserForm() Dim ctrl As Control For Each ctrl In UserForm1.Controls If TypeName(ctrl) = "OptionButton" Then ctrl.Value = False End If Next ctrl End Sub Sub ResetAllTextBoxesInUserForm() Dim ctrl As Control For Each ctrl In UserForm1.Controls If TypeName(ctrl) = "TextBox" Then ctrl.Text = "" End If Next ctrl End Sub