suz ( userfrom )

[gdemir]

gunaydın arkadaşlar

bır user from yarattım uzerıne
ComboBox1
CommandButton1
ListBox1

yerleştırdım
ComboBox1 dan urunu secıyorum CommandButton1 suz evresını gercekleştırıyorum sadece suzulen verılerın ListBox1
gosterılmesını beceremedım
bunun hakında yardımlarınızı ıstıyorum
sımdıden teşekkur ederım


Kodlar


Private Sub CommandButton1_Click()
Sheets("grapor").Select
Range("A2:G65535").Select
Selection.AutoFilter
Selection.AutoFilter
Selection.AutoFilter 2, ComboBox1.Value
End Sub


Private Sub UserForm_Click()
ListBox1.ColumnHeads = True
ListBox1.ColumnCount = 4
ListBox1.RowSource = "a2:d65535" 'sadece suzulen verılerın gorulesını istiyorum mum kunse
End Sub

 

[danersin]

Aşağıdaki linkte verdiğim örneği inceleyebilirsiniz yada kendi örnek dosyanızı yollarsanız daha iyi yardımcı oluruz.

http://www.excel.web.tr/viewtopic.php?t=3987

 

[gdemir]

iligini icin teşekkur ederım sorunu mu halletım
yenıden teşekkur ederım