Excel Vba Listbox Görüntülenmiyor

[wolff]

Merhaba bu forumda çok yeniyim ufak birşey yapmaya çalışıyorum. CariEkle diye form yaptım ekleme yaptığımda ekliyor sıkıntı yok ancak bunu listbox a ne yaptıysam listelenmedi yardımcı olursanız sevinirim hatta bunun üzerinde silme örneğide yapabilirsek çok sevinirim şimdidien teşekkür ederim

 

[Ömer BARAN]

Merhaba.

-- Userform'a ait UserForm_Click() kodunu silip, onun yerine aşağıdaki kod'un tümünü yapıştırın.
Bu işlem form açıldığında sayfada mevcut kayıtların Listbox'ta görüntülenmesini sağlar.

-- Userform'daki CommandButton1_Click() kodu'nun End Sub satırının hemen öncesine aşağıda kırmızı renklendirdiğim satırı kopyalayıp yapıştırın.
Bu işlemde eklenen yeni kaydın da ListBox'ta görüntülenmesini sağlar.
.

Private Sub UserForm_Initialize()
    ListBox1.ColumnCount = 5
[COLOR="red"]  ListBox1.RowSource = "MUSTERİLER!A2:O" & Sheets("MUSTERİLER").Cells(Rows.Count, 1).End(3).Row[/COLOR]
End Sub

 

[muygun]

Merhaba;
Alternatif olsun.
İnceleyin.
İyi çalışmalar.

 

[wolff]

Merhaba muygun ve Ömer BARAN çok teşekkür ederim ikiside çalıştı muygun yaptığı örnek güzel ama bizim yaptığımız kodlardan çok farklı mesela ekleme kodu bizimki uzun ama 2 satır kodla hepsini ekletmiş