UserForm'a TextBox ekleme

[teksen]

Öncelikle herkese iyi çalışmalar diliyorum.

Ekte gönderdiğim Form üzerinde bazı sıkıntılarım var ve malesef çözemedim.

Bu konuda yardımlarınızı bekliyorum.

Adet isimli bir TextBox ekledim, Fakat ListBox'ta gösteremiyorum

Birde açkılama TextBox'ı biraz alta doğru geniş ama ben yazdığım zaman yan yana yazmaya devam ediyor.Tabi ListBox'ta da bu yüzden düzgün görünmüyor.Listbox'ta bu şekilde göstermemizin bir yolu varmıdır?

Ayrıca ListBox'ta ki veriye tıkladığımda TextBox'larda görüyordum, fakat şimdi görünmüyor...Kodu uyguladığımda da hata veriyor.

Sorunlar biraz fazla oldu

Kusura bakmayın

Şimdiden teşekkür ederim.

 

[Skorpiyon]

Sayın teksen,

Ek'teki dosyayı inceleyiniz.

Açıklama için koymuş olduğunuz textbox nesnesinin properties bölümünde Multiline değerini True yaparsanız alt alta yazmayı etkin yapmış olursunuz.

Saygılarımla...

 

[teksen]

çok teşekkür ederim

elinize sağlık.

fakat hala ListBox'taki verilere tıkladığımda TextBox'larda göremiyorum

Sorun nerdedir acaba?

 

[mrttrn]

Private Sub ListBox1_Click()
TextBox1 = Worksheets("Sayfa1").Range("A" & ListBox1.ListIndex + 2)
TextBox2 = Worksheets("Sayfa1").Range("B" & ListBox1.ListIndex + 2)
TextBox5 = Worksheets("Sayfa1").Range("C" & ListBox1.ListIndex + 2)
TextBox3 = Worksheets("Sayfa1").Range("D" & ListBox1.ListIndex + 2)
End Sub

sn teksen yukarıdaki kod isteğinizi karşılar. Düzeltilen dosya ilişiktedir.

 

[teksen]

çok teşekkür ederim