Comboboxtaki değere sahip hücrenin seçilmesi

[NBATMAN]

Arkadaşlar, user formda iki combobox sa sahibim birincisinden sayfadan okuyacağım verileri textboxa çekiyorum ikinci combobox ıda textboxa bağladım (combobox2) ile veri seçiyorum.Yani bir çeşit ara bul ve değiştir işlemi gerçekleştiriyorum.Benim istediğim combobox2 ile seçtiğim son hücreden önceki hücreyi yani combobox1 de di değerin olduğu hücreyi seçmek aktif etmek ve sub ı bununla bitirmek.
Kullandığım kodu gönderiyorum.
Yardımlarınız için şimdiden çok teşekkürler....

Private Sub Combobox2_Click()
For Each hucre In Range("an18:an36" & Cells(1, "a").End(xlUp).Row)
If StrConv(hucre.Value, vbUpperCase) = StrConv(ComboBox2.Value, vbUpperCase) Then
hucre.Select
End If
Next
TextBox2.Text = ActiveCell.Offset(0, 0)
..........................................................buraya ( veya nereye yazılacağının en doğrusunu siz daha iyi bilirsiniz ) yazılacak kodu öğrenmek istiyorum.
End Sub

 

[Orion1]

Aşağıdaki kodları kullanınız.

Dim i As Long, say As Long
For i = Cells(65536, "A").End(xlUp).Row To 1 Step -1
    If StrConv(Cells(i, "AN").Value, vbUpperCase) = StrConv(ComboBox2.Value, vbUpperCase) Then
        say = say + 1
        If say = 2 Then
            Cells(i, "AN").Select
            TextBox2.Text = ActiveCell.Value
        End If
    End If
Next i

 

[NBATMAN]

Teşekkürler Evren BEY.