add procedure to prevent filling data on userform when run based on color label

[abdelfattah]

Hi
is there any procedure to prevent filling data on userform based on color label ?
what I want if I have lable1 is hidden or is not hidden but not yellow color then should not show any thing on usefrom when run it ( this means should not fill listbox or combobox or any tool on userfrom when run it if theses conditions are not verified ) , if the Label1 is not hidden and yellow color then should show the data on userform .
I want adding this procedure before my code in userform initialize() (this kind of protection).
thanks

 

[portews]

Without seeing what code you have...

I'd put code in after whatever code sets the code to yellow and say:

With UserForm1
    .TextBox1.Locked = True
    .ComboBox1.Locked = True
    'etc.
End With

and unlock them where you change it to not yellow.

If you want to lock everything down

Dim ctrl As Control
For Each ctrl In UserForm1.Controls
Debug.Print ctrl.Name, TypeName(ctrl)
    If Not TypeName(ctrl) = "Label" Then ctrl.Locked = True
Next
Set ctrl = Nothing

 

[abdelfattah]

Without seeing what code you have...

thanks just add before the whole code . if the condition is not met then should n't fill tools and when codition is met then should keep to run the macro and fill the data based on my code
by the way I don't see anything about yellow lable in the code even if that doesn't work for me when run the userform . all of things are filled .