I et Excel 5/95 dialogark er det mulig å endre verdien/innholdet i en samling kontroller etter
sløyfe gjennom kontrollene i samlingen, f.eks. slik: For hver cb i dlg.CheckBoxes.
I Excel 97 eller nyere grupperer ikke UserForm-objektet kontrollene på samme måte.
Nedenfor finner du noen eksempler på makroer som viser hvordan
du kan endre verdien/innholdet i flere UserForm-kontroller:
Sub ResetAllCheckBoxesInUserForm () Dim ctrl som kontroll for hver ctrl i UserForm1.Controls If TypeName (ctrl) = "CheckBox" Deretter ctrl.Value = False End If Next ctrl End Sub Sub ResetAllOptionButtonsInUserForm () Dim ctrl As Control For each ctrl In UserForm1. Kontroller Hvis TypeName (ctrl) = "OptionButton" Deretter 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