1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12:
UnderAddSelection () Dunkel cell som spänner Dunkla SumValue som Long För varje cell i val SumValue = SumValue + cell. Värdera Därefter MsgBox ”som summan av det utvalt värderar, är: ” & SumValue Avsluta suben