Veri Süz le ilgili yardım

[sin77]

Merhaba arkadaşlar.Sizden bir isteğim olacak. Ekte gönderdiğim dosyada sevk evrakının tarihi,nosu,adı,plakası gibi kriterlerle süzme işlemini yaptırmayı başaramadım.Birde bölme noya göre olsun,Ürün çeşidine olsun süzme yaptırdığımda örneğin: Bölme no 1 yazdığımda 1 ile başlayan (1,121,16...) gibi tüm bölmeleri getiriyor.Ürün çeşidi içinde aynısı.Örneğin t yazdığımda tomruk getirsin,içinde t harfi bulunan kağıtlık odunu getirmesin.Arkadaşlar bu konuda yardımcı olabilirmisiniz. tşk

 

[Merhum İdris SERDAR]

Dosyanız ekte olmuş mu?

 

[sin77]

Tşk ederim arkadaşım eline sağlık.Yalnız süzme işlemi yapılınca toplamları göstermiyor.bunada bir el atsan.

 

[Merhum İdris SERDAR]

Dosyanız yukarıda. Güncellendi.

 

[sin77]

Tşkler.Kusura bakmayın ama toplamlar aynı geliyor. Örneğin 1 nolu bölmeden sterli ve m3 lü emvallerin değerleri toplamı farklı ama toplamda ikiside aynı geliyor.

 

[sin77]

ve de sadece 30 a kadar olan değerler toplanıyor sonraki girdiğim değerler toplamda gözükmüyor.

 

[sin77]

Arkadaşım sorun tek kaldı onuda ekteki örnekte bir bakıversene.sorun 1 nolu bölme yazınca yana toplam geliyor. fakat 11 yada 121,yani cok haneli bölmelerde yana toplam gelmiyor. ne yapılabilir. tek sorun bu.tşk

 

[hamitcan]

son = Application.CountA(Range("d11:d5000")) + 10 olan satırı

son = Application.CountA(Range("d11:d5000")) + 14 olarak değiştirin