Listboxa 10dan Fazla Kolon Ekleyememe Hk

[mhrcvk]

Arkadaşlar Merhaba,
Aşağıdaki kod ile listboxa item ekliyorum fakat add item ile 10dan fazla kolon ekleyemediğim için hata alıyorum son 4 kolonu kaldırdığımda sorun olmuyor fakat be 10un üzerinde ekleme yapmam gerekiyor sorunu nasıl çözebilirim. Yardımcı olursanız sevinirim.

Private Sub CommandButton6_Click()


Dim Count As Integer
Count = ListBox1.ListCount
Count = Count + 1
   ListBox1.AddItem
   ListBox1.List(Count - 1, 0) = ComboBox9.Text 'İl'
   ListBox1.List(Count - 1, 1) = ComboBox11.Text 'Bölge'
   ListBox1.List(Count - 1, 2) = ComboBox10.Text 'İlçe'
   ListBox1.List(Count - 1, 3) = ComboBox2.Text 'grup adı'
   ListBox1.List(Count - 1, 4) = ComboBox3.Text 'Ürün adı'
   ListBox1.List(Count - 1, 5) = ComboBox4.Text 'Ürün Model adı'
   ListBox1.List(Count - 1, 6) = ComboBox5.Text 'Marka adı'
   ListBox1.List(Count - 1, 7) = ComboBox6.Text 'Üretici Firma'
   ListBox1.List(Count - 1, 8) = ComboBox7.Text 'Sayım Cinsi'
   ListBox1.List(Count - 1, 9) = ComboBox8.Text 'Giriş Tipi'
   ListBox1.List(Count - 1, 10) = TextBox18.Text 'Miktar'
   ListBox1.List(Count - 1, 11) = TextBox17.Text 'Giriş Tarihi'
   ListBox1.List(Count - 1, 12) = UserForm2.TextBox1.Text 'Giriş Yapan Kullanıcı'
   ListBox1.List(Count - 1, 13) = TextBox16.Text 'Açıklama'
  
   ComboBox2.Text = ""
   TextBox16.Text = ""
   TextBox18.Text = ""
   ComboBox7.Text = ""
   ComboBox9.Text = ""

End Sub

 

[Orion1]

Rowsource yöntemimi kullanınız.

 

[mhrcvk]

Rowsource yöntemimi kullanınız.

Değerli hocam Excel formül tarafını bitirdik fakat vbada yeni sayılırım araştırarak yavaştan başladım. Rowsource olayını araştırdım onu beceremeyince buradan ilerlerim bu 10 sütunda işimi çözmüştü şimdi sütun sayısını arttırınca farkettimki 10 sütundan fazlasını bu yöntemle ekleyemiyorum

 

[Korhan Ayhan]

Değerli hocam Excel formül tarafını bitirdik...

Çok iddialı olmuş...

 

[mhrcvk]

Çok iddialı olmuş...

Korhan hocam haklısınız excel derya deniz fakat ihtiyacım makro içermeyen konularda formülle çözebiliyorsam şimdiye kadar burada siz değerli üstatlarımdan öğrendiğim kadarı ile çözüyorum şimdilik ama elbetteki vardır bizimde bilgilerimizde eksiklik. Ama vba tarafı henüz henüz başlangıç seviyesi bile değil

 

[Korhan Ayhan]

O zaman size de tavsiyem temel bilgilerinizi öncelikle kuvvetlendirin. Sonrasında gerisi çorap söküğü gibi gelir.

Excel sayfası üzerinde bol bol döngüleri çalışın. Sonra nesneleri yönetmeye geçersiniz.

 

[mhrcvk]

O zaman size de tavsiyem temel bilgilerinizi öncelikle kuvvetlendirin. Sonrasında gerisi çorap söküğü gibi gelir.

Excel sayfası üzerinde bol bol döngüleri çalışın. Sonra nesneleri yönetmeye geçersiniz.

Haklısınız hocam ben girişi ufak bir ambar kayıt programı ile yapayım dedim hem öğrenme hemde beraberinde işime yarayacak birşey çıkarma açısından. Buraya kadar güzel geldim fakat burada takıldım

 

[Korhan Ayhan]

Bence yanlış ilerliyorsunuz.

Dediğim gibi önce olayları-yöntemleri kavrayın. Sonrası zaten çorap söküğü gibi gelecektir.

Bu şekilde yaptığınızda hep bir yanınız eksik kalacaktır.

 

[mhrcvk]

Bence yanlış ilerliyorsunuz.

Dediğim gibi önce olayları-yöntemleri kavrayın. Sonrası zaten çorap söküğü gibi gelecektir.

Bu şekilde yaptığınızda hep bir yanınız eksik kalacaktır.

Tavsiyeniz için teşekkür ederim değerli hocam bunu tamamladıktan sonra tavsiyenize uyacağım. Fakat küçük prüzleir hallederek bunu tamamlamam gerekli çünkü işimi kolaylaştıracak bir oluşum olacak bu. Tekrardan değerli tavsiyeleriniz için teşekkür ederim.

 

[Korhan Ayhan]

Rica ederim...

 

[mhrcvk]

Orion1 Hocam daha önce bir başka üyeye 2. bir listbox ekleyerek çöze bilirsin tavsiyesinde bulunmuş o şekilde çözdüm şimdilik teşekkürler.