Modificați valoarea / conținutul mai multor controale UserForm utilizând VBA în Microsoft Excel

Anonim

Într-o foaie de dialog Excel 5/95 este posibil să modificați valoarea / conținutul unei colecții de controale cu
parcurgerea comenzilor din colecție, de ex. așa: Pentru fiecare cb În dlg.CheckBoxes.
În Excel 97 sau o versiune ulterioară, obiectul UserForm nu grupează comenzile în același mod.
Mai jos veți găsi câteva exemple de macrocomenzi care arată cum
puteți modifica valoarea / conținutul mai multor controale UserForm:

Sub ResetAllCheckBoxesInUserForm () Dim ctrl ca control pentru fiecare ctrl din UserForm1.Controls If TypeName (ctrl) = "CheckBox" Then ctrl.Value = False End If Next ctrl End Sub Sub ResetAllOptionButtonsInUserForm () Dim ctrl As Control For Each. 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