ComboBox ile seçilen veriye isabet eden 4 kodun alınması

[ocamsul]

Merhabalar, herkese kolay gelsin arkadaşlar.ComboBox daki seçime göre TextBox12-13-14-15 e seçilmiş olan veriye isabet eden kodların sayfa2 deki kodlardan alınması sorunum var arkadaşlar ( formda mevcut kodları korumamız lazım dostlar)

 

[ocamsul]

Dostlar bu sorum askıda kalmış. Yadımlarınızı bekliyorum.

 

[Korhan Ayhan]

Selamlar,

Combobox1 için kullandığınız kodu aşağıdaki ile değiştirip denermisiniz. Eğer başka Textbox larada bilgi çağırmak isterseniz araya satır ekleyerek sütun bilgisini vermeniz yeterli olacaktır.

Private Sub ComboBox1_Change()
    If ComboBox1 <> "" Then
    Satır = ComboBox1.ListIndex + 1
    TextBox2 = Sheets("Sayfa2").Cells(Satır, "C")
    TextBox3 = Sheets("Sayfa2").Cells(Satır, "D")
    TextBox4 = Sheets("Sayfa2").Cells(Satır, "E")
    TextBox5 = Sheets("Sayfa2").Cells(Satır, "F")
    TextBox12 = Sheets("Sayfa2").Cells(Satır, "M")
    TextBox13 = Sheets("Sayfa2").Cells(Satır, "N")
    TextBox14 = Sheets("Sayfa2").Cells(Satır, "O")
    TextBox15 = Sheets("Sayfa2").Cells(Satır, "P")
    End If
End Sub

 

[ocamsul]

Sn: COST_CONTROL

Yine sorunuma çözümünüzü verdiniz. Eksik olmayın. çok teşşekkür ederim. Ayrıca mübarek kurban bayramınız mübarek olsun.