Comboboxda seçilenin karşılığı Texboxta görünsün

[CILEKESH]

Merhaba,

Hücrelere bulunan verilere göre,

örneğin;

A1 ALİ B1 VELİ
A2 MEHMET B2 CAFER
A3 ZAFER B3 BAYRAM

ise

Ben Combobox tan Ali'yi seçtiğimde Textbox ta Veli gelsin istiyorum,

Bu nasıl yapılır?

Şimdiden Teşekkür ederim.

 

[Ömer]

Merhaba,

Bu şekilde deneyin.

Private Sub ComboBox1_Change()
        
    Dim i As Long
    
    i = ComboBox1.ListIndex
    
    If i < 0 Then
        TextBox1.Text = ""
    Else
        TextBox1.Text = Range("B" & i + 1)
    End If
    
End Sub

.

 

[CILEKESH]

Ömer bey işe yaradı teşekkür ederim.