• DİKKAT

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

Soru Makro ile toplama işlemi nasıl yapılır.

Katılım
22 Temmuz 2019
Mesajlar
15
Excel Vers. ve Dili
eXCELL 2016
merhaba,

C4 hücresinden başlayacak şekilde U4 hücresine kadar makro ile mavi hücrelerdeki toplama işlemi yaptırılacak.
konu hakkında yardımcı olur musunuz ?

şimdiden teşekkür ederim.
 
Merhaba,

Sorunuzu örnek dosya ile destekleyip detaylı açıklarmısınız.

https://dosya.co


.
 
PHP:
Sub topla()
    toplam = 0
    For i = 3 To 21
        If Cells(4,i).Interior.Color = vbBlue Then
            toplam = toplam + Cells(4,i)
        End If
    Next
    [A1] = toplam
End Sub
Şeklinde deneyin. A1 hücresine toplamı yazar.
 
PHP:
Sub topla()
    toplam = 0
    For i = 3 To 21
        If Cells(4,i).Interior.Color = vbBlue Then
            toplam = toplam + Cells(4,i)
        End If
    Next
    [A1] = toplam
End Sub
Şeklinde deneyin. A1 hücresine toplamı yazar.
cevabınız için teşekkürler . dosya ekleyeceğim .
C4 de c6 ile c30 arası
D4 de d6 ile d30 arası
E4 de E6 ile E30 arası
.....
....
....
U4 de U6 ile U30 arasını toplasın istiyorum . 4. satırdaki hücreler bulunduğu kolonun 6 ile 30 uncu satırındaki verileri toplasın istiyorum
ya da formülle en altta toplattım dosyamda bu toplattığım veriyi her kolonun 4 . satıra yazılsın istiyorum
 
Neden 30. satırdaki toplama formülünü doğrudan 4. satırda kullanmıyorsunuz da ayrı işlemler ve makrolu çözüm istiyorsunuz?
 
Neden 30. satırdaki toplama formülünü doğrudan 4. satırda kullanmıyorsunuz da ayrı işlemler ve makrolu çözüm istiyorsunuz?
örnek olarak ;
Kolon C deki 1 lerin olduğu yerde formül olacak oriğinal dosyada . formül 3.satır eşittir 2.satır ise 1 yaz değilse boş bırak olacak . fakat 3.satır ise 1 leri topluyor.
bunun içinde orada veri olması gerekiyor. formül olursa formüller çakışıyor. bunu makro ile çözebilirzz diye düşündüm .
ya da 1.buton ve 2.buton eklersek 1.buton sadece mavi kısmı yapsın önce 2. buton ise daha sonra 1 lerin olduğu kısmı yapsın . renge göre vb kod olmazsa sevinirim.

çözüm yollarınız için şimdiden teşekkür ederim.
 
Sizin için önemli olan yer o zaman üst kısım değil 1'lerin olduğu kısım. Burdaki 1 yazma şartını tam olarak belirlerseniz farklı bir uygulama yapılabilir.
 

dosyanın orijinalini ekledim. 1 lerin olduğu kısıma ilave olarak 1. ve 2. satır birbirine eşitse mantıksal sınama "AND" İLE EKLENCEKTİR. fakat bunu eklemem için de 2. satırdaki değer makro ile veri olarak eklenirse formül çalışır diye düşündüm .
 
Yapmaya çalıştığınız, 7. satırdaki tarih K ve L sütunundaki tarihler arasındaysa Q sütunundaki sayıyı hücreye yazmak sanıyorum. Birinci satırdaki durum ne zaman devreye giriyor? Eğer "o sütunun toplamı birinci satırdaki sayıya eşitse işlem yapma" demek istiyorsanız bunu bu formüllerle yapamazsınız. Diyelim ki birinci satırda 5 yazıyor. Aşağıdaki hangi satırlarda sayı olacak, hangilerinde olmayacak, buna nasıl karar veriliyor? Eğer "üstten başlayarak şarta uyan ilk satırlara işlem yap, alttakilere işlem yapma" diye bir kuralınız varsa, formül ona göre düzenlenebilir.

Örneğin Örnek dsoyanızda HL sütununda birinci satırda 3 varken ikinci satırda yani sütun toplamı 17 idi. Aşağıdaki formülü HL9 hücresine yazıp aşağı doğru kopyaladığımda 265, 271 ve 272'ye 1 yazdı, sütun toplamı da 3 oldu:

=EĞER(VE(HL$7>=$K9;HL$7<=$L9;TOPLA($HL$8:HL8)-HL$8<HL$1);$Q9;"")
 
Son düzenleme:
Geri
Üst