Soru Sütun Atlayarak Ortalama Alma

sirkülasyon

Altın Üye
Katılım
10 Temmuz 2012
Mesajlar
2,518
Excel Vers. ve Dili
2021 LTSC TR
Altın Üyelik Bitiş Tarihi
18-06-2026
Kod:
Dim Bak As Integer
 On Error Resume Next
    For Bak = 12 To 46
        Range("O" & Bak).Value = WorksheetFunction.Average( _
                                        Range("E" & Bak), _
                                        Range("G" & Bak), _
                                        Range("I" & Bak), _
                                        Range("K" & Bak), _
                                        Range("M" & Bak))
                                        
        Range("P" & Bak).Value = WorksheetFunction.Average( _
                                        Range("F" & Bak), _
                                        Range("H" & Bak), _
                                        Range("J" & Bak), _
                                        Range("L" & Bak), _
                                        Range("N" & Bak))
                                        
    Next
Yukarıdaki kod ile boş olan hücreleri de hesaplamaya dahil ettiği için ortalama hatalı çıkıyor. Mümkünse ortalamayı hesaplarken sadece dolu hücreleri dikkate alması için nasıl bir düzenleme yapabiliriz?
 

Ömer

Moderatör
Yönetici
Katılım
18 Ağustos 2007
Mesajlar
22,184
Excel Vers. ve Dili
Microsoft 365 Tr
Ofis 2016 Tr
Merhaba,

Boş hücreleri dikkate almaması gerekir. Boş hücremi değeri sıfır olan hücre mi?
 

sirkülasyon

Altın Üye
Katılım
10 Temmuz 2012
Mesajlar
2,518
Excel Vers. ve Dili
2021 LTSC TR
Altın Üyelik Bitiş Tarihi
18-06-2026
Hepsi boş hücreler Ömer Abi. Hiçbir veri girilmemiş
O hücresine ortalama alınan sütunlar boşları dikkate almıyor.
P hücresine ortalama alınan sütunlar boşları dikkate alıyor.
 
Son düzenleme:

Ömer

Moderatör
Yönetici
Katılım
18 Ağustos 2007
Mesajlar
22,184
Excel Vers. ve Dili
Microsoft 365 Tr
Ofis 2016 Tr
Birinde alıyor birinde almıyorsa hücreleri kontrol etmek gerekir. Ben tahmini yazarım fakat bunun yerine örnek dosya eklerseniz daha kısa sonuça gitmiş oluruz.
 
Üst