Zmień wartość/zawartość kilku formantów UserForm za pomocą VBA w programie Microsoft Excel

Anonim

W arkuszu dialogowym Excel 5/95 można zmienić wartość/zawartość zbioru kontrolek poprzez:
przechodzenie przez kontrolki w kolekcji, np. tak: Dla każdego cb W dlg.CheckBoxes.
W programie Excel 97 lub nowszym obiekt UserForm nie grupuje kontrolek w ten sam sposób.
Poniżej znajdziesz kilka przykładowych makr, które pokazują jak
możesz zmienić wartość/zawartość kilku kontrolek UserForm:

Sub ResetAllCheckBoxesInUserForm() Dim ctrl As Control dla każdego 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. Kontrolki If TypeName(ctrl) = "OptionButton" Then ctrl.Value = False End If Next ctrl End Sub Sub ResetAllTextBoxesInUserForm() Dim ctrl As Control dla każdego ctrl In UserForm1.Controls If TypeName(ctrl) = "TextBox" Then ctrl.Text = "" End If Next ctrl End Sub