Simple code require form TextBox selection

[ipbr21054]

Morning,
I have a userform which i can select a customers name from a ComboBox currently called NameForDateEntryBox,once the name is selected it is then highlighted blue.
I then manually select TextBox7 where i enter a date.

Can you advise a simple code then once a name is selected / highlighted blue then automatically select TextBox7


Many thanks.

 

[ipbr21054]

I am not sure if the below is correct / will work etc because i already have a Change event in use.
Can you advise another way or how i would include it in the existing Change event to try.

Private Sub CustomerSearchBox_Change()        If CustomerSearchBox.Text = "" Then
            Exit Sub
        Else
            TextBox7.SetFocus
        End If
 
    End Sub

Private Sub CustomerSearchBox_Change()'Modified  10/3/2018  5:51:42 AM  EDT
Dim SearchString As String
Dim SearchRange As Range
SearchString = CustomerSearchBox.Value
Dim LastRow As Long
LastRow = Cells(Rows.Count, "B").End(xlUp).Row
Set SearchRange = Range("B8:B" & LastRow).Find(SearchString, LookIn:=xlValues, lookat:=xlWhole)
If SearchRange Is Nothing Then MsgBox SearchString & "  Not Found": Exit Sub
SearchRange.Select
Unload Me
End Sub

 

[ipbr21054]

I see my mistake in the last post but the below works.

Thanks

Private Sub NameForDateEntryBox_Change()        If NameForDateEntryBox.Text = "" Then
            Exit Sub
        Else
            TextBox7.SetFocus
        End If
 
    End Sub