Bu dosya, Sayfa1 üzerindeki listede aynı isme ait satırların sayısal değerlerinin alt toplamını almayı ve bu alt toplamları kaldırmayı gösterir. İşlem, sayfadaki tek bir düğme ile yapılır.
C3 hücresinde ise bir üstteki değere 1 eklenir:
Dosyanın içeriği
- Sayfa1: A1:E6 aralığında liste yer alır. A sütununda Adı (ali, ali, veli gibi isimler), C sütununda Tutar1, E sütununda Tutar3 değerleri bulunur. Alt toplam işlemi A, C, D ve E sütunlarındaki yapıya göre 3., 4. ve 5. sütunları kapsar.
- Sayfada alt toplamı açıp kapatan bir ToggleButton denetimi bulunur. Düğme metni duruma göre Alttoplam Al ve Alttoplam Kaldır olarak değişir.
Kullanılan formüller
Listedeki değerler basit formüllerle üretilmiştir. E2 hücresinde D2 değerine 10 eklenir:=D2+10
=C2+1
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.- ToggleButton1_Click (Sayfa1): Düğmenin durumuna bakar. Düğme basılı hale gelince metni "Alttoplam Kaldır" yapar ve Alttoplam makrosunu çağırır; eski konuma dönünce metni "Alttoplam Al" yapar ve Alttoplam_iptal makrosunu çağırır.
- Alttoplam (Module1): A1 hücresini seçer ve listeyi 1. sütun olan isme göre gruplar. 3., 4. ve 5. sütunların toplamını (xlSum) her isim grubunun altına ekler. Sayfa sonu eklenmez, toplam satırı verinin altına yazılır.
- Alttoplam_iptal (Module1): Listedeki alt toplamları kaldırır ve liste ilk haline döner.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Sayfa1 üzerindeki listeye isimleri ve tutarları girin; aynı isimlere ait satırlar alt alta olmalıdır.
- Alt toplamları almak için düğmeye tıklayın; her isim grubunun altında toplam satırı oluşur.
- Alt toplamları kaldırmak için düğmeye yeniden tıklayın.