Hide / Unhide Userform Controls

[Rupert Bennett]

Hello,
Sorry if I am long winded, but I just want to state my problem clearly, so it may be easier to get a solution.
I am searching for a VBA solution for hiding and showing some userform controls based on the value in another control. There are 4 controls, among others, on the userform. There is cboIsGraded that can have a value of "Yes" or "No".
If the value in cboIsGraded is "No", I then want the txtGrade, txtGradingCo and txtGradingFee visible to be false, or true if cboIsGraded.Value is "Yes".
I have tried putting some code like:

If cboIsGraded.value = "NO" then txtGrade.visible = False. I also tried putting the code in the Change and Exit events of cboIsGraded, without any success.

Thanks in advance for your help.

 

[dmt32]

Hi
one way maybe would be to use the Change Event of the combobox to loop over the controls you want to hide in an array

Private Sub cboIsGraded_Change()
    Dim Ctrl As Variant
    For Each Ctrl In Array(txtGrade, txtGradingCo, txtGradingFee)
        Ctrl.Visible = Me.cboIsGraded.Value = "Yes"
    Next Ctrl
End Sub

Dave

 

[Rupert Bennett]

Thank you very much, Dave. This works perfectly. I guess that if I want to also hide the associated labels, I could just put them into the array. I am really happy with this. I spent a long time searching forums and trying different codes in the Change, Exit and afterUpdate events without any success. Thanks again.

 

[dmt32]

Most welcome glad suggestion helps you & appreciate your feedback

Dave