Cambie el valor / contenido de varios controles de UserForm usando VBA en Microsoft Excel

Anonim

En una hoja de diálogo de Excel 5/95 es posible cambiar el valor / contenido de una colección de controles por
recorrer 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 UserForm:

Sub ResetAllCheckBoxesInUserForm () Dim ctrl como control para cada ctrl en UserForm1.Controls If TypeName (ctrl) = "CheckBox" Entonces ctrl.Value = False End If Next ctrl End Sub Sub ResetAllOptionButtonsInUserForm () Dim ctrl como control de usuario para cada ctr1. Controles If TypeName (ctrl) = "OptionButton" Entonces ctrl.Value = False End If Next ctrl End Sub Sub ResetAllTextBoxesInUserForm () Dim ctrl Como control para cada ctrl en UserForm1.Controls If TypeName (ctrl) = "TextBox" Entonces ctrl.Text = "" End If Next ctrl End Sub