Userform Yardim

[semprass]

arkadaşlar uzun bir süre aranızda yoktum

öncelikle merhaba
arkadaşlar ekde belirttiğim bir program var
bir arkadaşımızın yaptığı programdan esinlenerek birazda değiştirerek bir şeyler katabilmeye çalıştım ama tıkandımm şimdi geleyim konuya konuyu resim açıklıyor.

yinede açıklıyim listeye sadece b sütunu değilde yanına istediğim kadar sütun eklemek istiyorumama mesela listede stokkoda tıkladığım zaman liste excelde ne ise onun gibi karşıma çıksın yani sadece ürün adı değil vs.vs.vs

 

[Orion1]

Ekli dosyayı inceleyiniz.

Private Sub ListBox2_Click()
    On Error Resume Next
        [COLOR="Red"]Dim sat As Long
            sat = ListBox2.ListIndex + 1
                arşivpro.TextBox1.Value = Sheets("Sayfa1").Cells(sat, "B").Value _
                & "-" & Sheets("Sayfa1").Cells(sat, "C").Value _
                & "-" & Sheets("Sayfa1").Cells(sat, "D").Value _
                & "-" & Sheets("Sayfa1").Cells(sat, "E").Value _
                & "-" & Sheets("Sayfa1").Cells(sat, "F").Value _
                & "-" & Sheets("Sayfa1").Cells(sat, "G").Value[/COLOR]                
        ComboBox3.ListIndex = ListBox2.ListIndex
Label4.Caption = "Konu A" & ListBox2.ListIndex + 1 & " hücresinde," & " Kod B" & ListBox2.ListIndex + 1 & " hücresinde kayıtlıdır."
TextBox2.Text = ListBox2.Value
End Sub

 

[semprass]

orion 2

teşekkür ederim ama benim istediğim
textbox1 b sütunu
textbox 2 c sütünu
textbox 3 d sütünu
textbox 4 e sütünu

gibi

 

[Orion1]

orion 2

teşekkür ederim ama benim istediğim
textbox1 b sütunu
textbox 2 c sütünu
textbox 3 d sütünu
textbox 4 e sütünu

gibi

Userform'unuzda textbox3 ve textbox4 yok.

 

[semprass]

işte bilseydim zaten sizin gibi bilgili insanlara gerek kalmazdı
yani onuda siz katacaktınız
tekrardan teşekkür ederim yanlış anlaşılma oldu ise