• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Değişik İlçelerde Benzer Köy Nüfus Toplamı

Katılım
9 Mart 2005
Mesajlar
109
Ekteki excel Tablosunda Köy adı sütununda bulunan köyler değişik ilçede de olduğunda ilk ilçede nüfus topluyor. Bunu ilçe bazında nasıl filitre yapabiliriz.
 

Ekli dosyalar

cevap

sorduğunuz soruyu çok iyi anlayamadım ama ÇOKETOPLA fonksiyonuna bir bakın derim
 
Ben ayrı bir yerde toplamlarını listeleme ile ilgili örnek veriyorum;

Kod:
Sub Nüfus_Toplamı()
    Dim Rky As Object, rs As Object, sorgu As String
    Set Rky = CreateObject("adodb.connection")
    Set rs = CreateObject("adodb.recordset")
    Rky.Open "provider=microsoft.ace.oledb.12.0;data source=" & _
    ThisWorkbook.FullName & ";Extended properties=""Excel 12.0;hdr=no"""
    sorgu = "Select f3 ,sum(f6) from [Sayfa1$D5:J24]"
    sorgu = sorgu + "where not isnull(f3) group by f3"
    rs.Open sorgu, Rky, 1, 1
    Range("L5").CopyFromRecordset rs
    rs.Close: Rky.Close
    Set Rky = Nothing: Set rs = Nothing: sorgu = ""
End Sub
 
Merhaba,

Sorunuzu daha net sormalısınız.
Bir deneyin, olmadı derseniz detay vermeniz gerekiyor.
Kod:
=EĞER(ÇOKEĞERSAY($E$5:E5;E5;$F$5:F5;F5)=1;TOPLA.ÇARPIM(($E$5:$E$24=E5)*
($F$5:$F$24=F5)*($I$5:$I$24));"")
 
Geri
Üst