Highlighting Multiple Textbox in User Form

[deeast]

it is possible to highlight multiple textbox in one userform to inform that the field need to be field?

If TBPOCD.value = "" Or TBEPON.value = "" Or TBLN.value = "" Then
If TBPOCD.value = "" Then
TBPOCD.BackColor = vbYellow
Exit Sub
End If

If TBEPON.value = "" Then
TBEPON.BackColor = vbYellow
Exit Sub
End If

If TBLN.value = "" Then
TBLN.BackColor = vbYellow
End If

 

[My Aswer Is This]

it is possible to highlight multiple textbox in one userform to inform that the field need to be field?

If TBPOCD.value = "" Or TBEPON.value = "" Or TBLN.value = "" Then
If TBPOCD.value = "" Then
TBPOCD.BackColor = vbYellow
Exit Sub
End If

If TBEPON.value = "" Then
TBEPON.BackColor = vbYellow
Exit Sub
End If

If TBLN.value = "" Then
TBLN.BackColor = vbYellow
End If

So, you want to search all the Textboxes in your Userform and if their value is nothing Turn The back color of them to Yellow is that what you want

 

[deeast]

So, you want to search all the Textboxes in your Userform and if their value is nothing Turn The back color of them to Yellow is that what you want

yes, exactly. can u help me please?

 

[My Aswer Is This]

Try this:

Private Sub CommandButton1_Click()
'Modified  6/22/2022  8:28:25 PM  EDT
For Each Xcontrol In Me.Controls
        If TypeName(Xcontrol) = "TextBox" Then
            If Xcontrol.Value = vbNullString Then
                Xcontrol.BackColor = vbYellow
            End If
        End If
    Next Xcontrol
End Sub

 

[deeast]

Try this:

Private Sub CommandButton1_Click()
'Modified  6/22/2022  8:28:25 PM  EDT
For Each Xcontrol In Me.Controls
        If TypeName(Xcontrol) = "TextBox" Then
            If Xcontrol.Value = vbNullString Then
                Xcontrol.BackColor = vbYellow
            End If
        End If
    Next Xcontrol
End Sub

i'm sorry Xcontrol set as what? I'm really new in this, TIA

 

[My Aswer Is This]

i'm sorry Xcontrol set as what? I'm really new in this, TIA

Did you try to run the script?

The xcontrol we are looking for are Textboxes in your userform.
The script looks for all Textboxes in your userform

Why is the script not working
Put my script in a button on the Userform

 

[My Aswer Is This]

You're using a very old version of Excel 2010
As I'm using 2013 which is also old, but the script works for me

 

[deeast]

You're using a very old version of Excel 2010
As I'm using 2013 which is also old, but the script wits work

Did you try to run the script?

The xcontrol we are looking for are Textboxes in your userform.
The script looks for all Textboxes in your userform

Why is the script not working
Put my script in a button on the Userform

finally its work, yayy.. TIA

 

[My Aswer Is This]

finally its work, yayy.. TIA

Glad I was able to help you.
Come back here to Mr. Excel next time you need additional assistance.