Listboxda aylık toplamlar

[seddur]

Merhaba.Ekli dosyada görüleceği üzere Anasayfa G sutunundaki tutar değerlerini combobox1'deki ay ve combobox2'deki yıla göre ay ay toplamlarını listboxda döküm olarak almaya çalışıyorum.Biraz toparladım ama tam sonuca ulaşamadım.Yardımcı olabilirseniz sevinirim.

 

[Korhan Ayhan]

İnceleyiniz.

 

[seddur]

Hocam bir kez daha Teşekkürler.

 

[seddur]

İnceleyiniz.

Yazdığınız kod gayet güzel çalışmasına rağmen orjinal dosyaya uyarlamak istediğimde hata veriyor.Orjinal dosya üzerinden bakabilirseniz sevinirim.
(Kod Anasayfada sol üst köşede Aylık rapor butonunda yazılıdır)

ORJINAL.1.xlsm dosyasını indir - download

ORJINAL.1.xlsm dosyasını indir, download. Dosya.tc .Dosya Upload. Dosya Paylaş. Dosya Yükle

s6.dosya.tc

 

[Korhan Ayhan]

Merhaba,

Asıl dosyanızda örnek dosyada belirtmediğiniz durumlar var. Bunları düzeltmeniz gerekir.

Aşağıdaki kırmızı renkli 2 değerini 15 yapmanız gerekiyor. Çünkü asıl dosyanızda veriler 15. satırdan başlıyor.

My_Data = Sh.Range("A2:M" & Sh.Cells(Sh.Rows.Count, 1).End(3).Row).Value

Ayrıca bazı satırlarda TARİH alanı boş bu sebeple hata alıyorsunuz. Bu alanlara tarih yazabilirsiniz. Ya da boş olması gerekiyorsa koda IF sorgu satırı eklemeniz gerekir.

Ek olarak G sütununda bazı hücreler METİN biçiminde görünüyor. Bunlarıda düzetlmeniz gerekir. Bu sütunda biçim olarak hücreleri ortaladığınız için bu tarz hataları göremiyorsunuz. Sayısal alanlarda biçim olarak hücre ortala biçimini kullanmamanızı tavsiye ederim.

G64-G65-G95 hücrelerini elle düzeltmelisiniz.

Ayrıca TUTAR sütunundaki boş hücrelere SIFIR yazmalısınız.

 

[seddur]

Tamam söylediklerinizi yaptım şu anda çalışıyor.Tekrar Teşekkür ederim.