ComboBoxta seçilen veriyi hücrede bul seç

[Feylosof]

Değerli arkadaşlar
ComboBoxta seçtiğim bir ismi Sayfa1 deki A sütunuda bir çok isimden bulup o ismi seçecek. Bunun için bir koda ihtiyacım var.
Yardımını esirgemeyecek olan excel dostlarına şimdiden teşekkür ederim.

 

[Ömer]

Merhaba,
Bu şekilde deneyin.

Private Sub ComboBox1_Change()

    Dim c As Range, S1 As Worksheet
    
    Set S1 = Sheets("Sayfa1")
    
    Set c = S1.[A:A].Find(ComboBox1.Value, , xlValues, xlWhole)
    If Not c Is Nothing Then
        S1.Cells(c.Row, "A").Select
    End If
        
End Sub

 

[Feylosof]

Ömer Hocam,
Çok teşekkür ederim. Kastettiğim tam da buydu. Emeğinize sağlık.