Summenumre i udvælgelsen

Summerer alle numrene i den valgte region og placerer summen i "A1"

Delsumsselektion () Dim celle som område Dim sum som dobbelt 'Iterer gennem hver celle i markering For hver celle i markering' Tilføj værdien til den variable sum sum = sum + celle. Sub