Jump to cell when choosing a value in a combo box

[Jonasmj]

I have created a combo box that has the choice of several different values.
I made a small list with those values located on the same sheet as the combo box. When I choose a value I want to be taken to the cell in a specified column where this value is presented for the first time. Ie a kind of search function based on what the user chooses in the combo box.

I know I can use
Cells.Find(What:="value" but I don't know how I find the argument "value" from the selected value in the combo box.
What code is used?

Regards Joans

 

[Jonasmj]

This is not tested fully, but see what you think of this, if it can't find your value in the list below it will select A1 and start again;

Dim counter As Integer
counter = 0
    ComboBox1.ListFillRange = "a1:a10"

Dim c As Range
mystart:
For Each c In Range("A" & ActiveCell.Row + 1 & ":A500")
    If c.Value = ComboBox1.Value Then
    c.Select
    If MsgBox("Is this the value you are looking for?", vbYesNo) = vbNo Then GoTo myexit
    Exit Sub
    End If
myexit:
    Next
    If counter >= 1 Then Exit Sub
    Range("A1").Select
    counter = counter + 1
    GoTo mystart

I solved it (I think)
Just removed "myexit" and msgbox and voila

Dim counter As Integer
counter = 0
    ComboBox1.ListFillRange = "a1:a10"

Dim c As Range
mystart:
For Each c In Range("A" & ActiveCell.Row + 1 & ":A500")
    If c.Value = ComboBox1.Value Then
    c.Select
    Exit Sub
    End If
    Next

Thank you jimboy!