Thay đổi giá trị / nội dung của một số UserForm-control bằng VBA trong Microsoft Excel
Trong bảng tính Excel 5/95, có thể thay đổi giá trị / nội dung của một tập hợp các điều khiển bằng cách lặp qua các điều khiển trong tập hợp, ví dụ: như thế này: Đối với Mỗi cb Trong dlg.CheckBoxes.
Trong Excel 97 trở lên, đối tượng UserForm không nhóm các điều khiển theo cùng một cách.
Dưới đây, bạn sẽ tìm thấy một số macro ví dụ cho thấy cách bạn có thể thay đổi giá trị / nội dung của một số UserForm-control:
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