Select specific cell depending on Textbox1 & motorcycle make value

[ipbr21054]

I have a form where the user enters values with various text/combo boxes.
These values are then sent to worksheet.
Textbox1 is the customers name.

The code in Red selects cell I for the customer just added to worksheet.
Where it is currently placed select the cell for everybody.
The cell in question is for the date.

Im wanting to change it so it only works for SUZUKI YAMAHA & KAWASAKI
You will see the code above is shown should one of the makes be used but im stuck with using that code with it.
Basically if SUZUKI YAMAHA or KAWASAKI was used then select the cell I anything else just leave it.

The code supplied is the last part of a working code.

  End If
 
    If Me.ComboBox3.Value = "SUZUKI" Then
       MsgBox "DONT FORGET TO ADD YEAR", vbInformation, "MOTORCYCLE YEAR MESSAGE"
      
    ElseIf Me.ComboBox3.Value = "YAMAHA" Then
       MsgBox "DONT FORGET TO ADD YEAR", vbInformation, "MOTORCYCLE YEAR MESSAGE"
      
    ElseIf Me.ComboBox3.Value = "KAWASAKI" Then
       MsgBox "DONT FORGET TO ADD YEAR", vbInformation, "MOTORCYCLE YEAR MESSAGE"
      
    End If

    [COLOR=rgb(184, 49, 47)]Range("A:A").Find(TextBox1.Value, , xlValues, xlWhole).Offset(, 8).Select[/COLOR]
End Sub

 

[mumps]

try:

Sub test()
    Select Case combobox3.Value
        Case "SUZUKI", "YAMAHA", "KAWASAKI"
            MsgBox "DONT FORGET TO ADD YEAR", vbInformation, "MOTORCYCLE YEAR MESSAGE"
            Range("A:A").Find(TextBox1.Value, , xlValues, xlWhole).Offset(, 8).Select
    End Select
End Sub

 

[ipbr21054]

Am i using that in replace of the code i supplied in post before ?

 

[mumps]

Yes, that is correct.

 

[ipbr21054]

Works well Thanks

 

[mumps]

You are very welcome.