Private Sub ComboBox1_Change()
ListBox1.ColumnCount = 18
ListBox1.RowSource = "Sayfa1!A1:R15"
ListBox1.ColumnWidths = "20;20;20;20;20;20;20;20;20;20;20;20;20;20;20;20;20;20"
End Sub
Yukarıda combobox1 den bir sayfa ismi seçince , seçtiğim sayfanın listboxta gözükmesini istiyorum.sayfa1!a1:r15 yerine combobox1!a1:r15 gibi birşey olsun istiyorum.
ListBox1.ColumnCount = 18
ListBox1.RowSource = "Sayfa1!A1:R15"
ListBox1.ColumnWidths = "20;20;20;20;20;20;20;20;20;20;20;20;20;20;20;20;20;20"
End Sub
Yukarıda combobox1 den bir sayfa ismi seçince , seçtiğim sayfanın listboxta gözükmesini istiyorum.sayfa1!a1:r15 yerine combobox1!a1:r15 gibi birşey olsun istiyorum.