Brojevi zbroja u odabiru -

Zbraja sve brojeve u odabranoj regiji i stavlja zbroj u "A1"

Sub sum_selection () Zatamni ćeliju kao raspon Dim sum As Double 'Iterirajte kroz svaku ćeliju u odabiru Za svaku ćeliju u odabiru' Dodajte vrijednost varijabli zbroj zbroj = zbroj + ćelija.Vrijednost Sljedeće ćelije ćelije (1, 1) = zbroj Kraj Pod