Променете стойността/съдържанието на няколко контроли на UserForm с помощта на VBA в Microsoft Excel

Съдържание

В диалогов лист на Excel 5/95 е възможно да промените стойността/съдържанието на колекция от контроли чрез
преминаване през контролите в колекцията, напр. така: За всеки cb В dlg.CheckBoxes.
В Excel 97 или по-нова версия UserForm-обектът не групира контролите по същия начин.
По -долу ще намерите някои примерни макроси, които показват как
можете да промените стойността/съдържанието на няколко контроли на UserForm:

Sub ResetAllCheckBoxesInUserForm () Dim ctrl като контрол за всеки ctrl в UserForm1.Controls If TypeName (ctrl) = "CheckBox" Тогава ctrl.Value = False End Ако Следващ ctrl End Sub ResetAllOptionButtonsInUserForm Form Потребител ctr Контролира If TypeName (ctrl) = "OptionButton" Тогава ctrl.Value = False End If Next ctrl End Sub Sub ResetAllTextBoxesInUserForm () Dim ctrl като контрол за всеки ctrl в UserForm1.Controls If TypeName (ctrl) = "TextBox" Тогава = "" End If Next ctrl End Sub

Така ще помогнете за развитието на сайта, сподели с приятелите си

wave wave wave wave wave