listbox'a veri almada sorun

[EmirhanG]

merhabalar herkezlere hayırlı akşamlar. Arkadaşlar listbox'a veri almakda küçük olduğunu zannettiğim bir sorunum var yardımcı olursanız sevinirim (aktif olan sayfadaki verileri buton yardımıyla listbox'a getirmek istedim ama takıldım)

arkadaşlar dosya ekte



T E Ş E K Ü R L E R....!

 

[N.Ziya Hiçdurmaz]

Yanıt

Kodu bunu ile değiştirip deneyiniz.

Private Sub UserForm_Initialize()
[COLOR="Blue"]ListBox1.ColumnCount = 4
ListBox1.RowSource = "A3:D" & Cells(65536, "A").End(3).Row[/COLOR]
ComboBox1.AddItem "Servis"
ComboBox1.AddItem "Tezgah"
ComboBox1.AddItem "Tedarikçi"
ComboBox2.AddItem "Aktif"
ComboBox2.AddItem "Pasif"
End Sub

 

[EmirhanG]

sayın Visual Basic For Applications ilginize teşekürler ama sorumun yanıtı bu değil ben form üzerindeki "düzenle" butonuna tıklandığında combobox1 de seçili sayfayı açtırıp ve o sayfadaki verileri yani aktif ettiğim sayfadaki verileri listbox'a getirmek istiyorum ama rowsource sorunu veriyor mümkünse dosyayı incelerseniz memnun olurum teşekürler

 

[Orion1]

Sayın EmirhanG ekli dosyayı inceleyiniz.

Private Sub ComboBox1_Click()
Sheets(ComboBox1.Value).Select
ListBox1.ColumnCount = 4
ListBox1.RowSource = "A3:D" & Cells(65536, "A").End(3).Row
End Sub