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