Modifiez la valeur / contenu de plusieurs UserForm-contrôles en utilisant VBA dans Microsoft Excel
Dans une feuille de dialogue Excel 5/95, il est possible de modifier la valeur / le contenu d’une collection de contrôles en parcourant les contrôles de la collection, par ex. comme ceci: Pour chaque cb dans dlg.CheckBoxes.
Dans Excel 97 ou version ultérieure, l’objet UserForm ne regroupe pas les contrôles de la même manière.
Ci-dessous vous trouverez quelques exemples de macros qui montrent comment vous pouvez changer la valeur / le contenu de plusieurs contrôles 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