Sub event that evaluates changing label in UserForm???

[MistakesWereMade]

I have a label that changes occasionally. If this label is one thing, I want the CommandButtons in my userform to be locked... If it is the other option, I want the command buttons to be unlocked. I've tried to use Label1_Change() but it doesn't seem to work. Any ideas on how I might achieve this?

 

[dmt32]

Hi,
Label control does not have a change event (double click the control in the editor & in dropdown on right you will see all available events for selected control)
- you should be able to manage the enabled state of your commandbuttons via the code that changes the label caption
If not sure how to do this publish your code here

Dave

 

[MistakesWereMade]

My code is below. Label1 is changed via another userform input. Instead of doing this enabled stuff though... I would like to use the locked property for my command buttons. I would also like to exclude a few command buttons from becoming locked.

Private Sub Label1_Change()


Dim ctrl As Control


If InStr(Me.Label1.Caption, "Signed in as") > 0 Then
    
    For Each ctrl In UserForm1.Controls
        ctrl.Enabled = True
    Next
    
    Set ctrl = Nothing
    
Else
    
    For Each ctrl In UserForm1.Controls
        ctrl.Enabled = False
    Next
    
    Set ctrl = Nothing


End If


End Sub

 

[mikerickson]

I would put the ControlButton locking code in the routine that changes the Label's caption.

 

[MistakesWereMade]

That'll do it lol