listbox da aralık verme

[ilkiliroglu]

arkadaşlar formdan edindiğim bir çalışma sayfasını kendime uyarlamaya çalışıyorum ancak listbox ın hücre aralıkları benim istediğim genişlikte değil list box ın üzerinde hazırladığım textboxta istediğim ebatlar var ancak listboxdaki yazıları hizalayamadım bu konuda yardımcı olabilirseniz sevinirim

 

[sturan2]

aşağıdaki kodu userform un intialize olayına yazın. rakamlar sırasıyla sütün genişliklerini ifade ediyor.aşağıdaki örnek 4 sütunluk bir listbox için



UserForm1.ListBox1.ColumnWidths = "33" & ";" & "70" & ";" & "100" & ";" & "50"

 

[Mahmut Kök]

userform_initialize kısmındaki aşağıdaki kod, listedeki sütunların aralıklarını gösterir. Bunları değiştirerek istediğiniz ayarları bulabilirsiniz.

ListBox1.ColumnWidths = "50;80;70;60;50;70;50;50"

Görerek yapmak için, liste kutusu seçiliyken, sol menüden rowsoruce kısmına ilgili sayfayı ve aralığı yazın. (örnek: =liste!b1:m5 )


Listede ilgili aralığa ait veriler gelince de, yine sol menüden, columnwidths kısmına, aralarına virgül koyarak değerler giriniz. (Örnek 65,65,250 gibi) Orada gerekli uyyarlamaları kendi yapıyor zaten, bu şekilde de yapabilirsiniz.

 

[ilkiliroglu]

bul butonu eklemek

arkadaşlar yardımınız için teşekkür ediyorum istediğimi yapabildim ancak bu userforma bul butoru eklemek istiyorum ve hangi sutun olursa olsun aradığım kelimenin geçtiği tüm satırları listboxta göstermesi için ne yapabilirim formdaki bazı bul makrolarını denedim ama hata verdi yardımcı olursanız sevinirim

 

[sturan2]

ekteki dosyayı kullanaabilirsiniz sanırım.

 

[sturan2]

yüklemeye çalışıyorum

 

[ilkiliroglu]

ilginiz için teşekkürler sabırsızlıkla bekliyorum

 

[sturan2]

dosyayı yukarıya ekledim.