Summe eines Bereiches als MsgBox
Die Summe eines bestimmten Bereiches soll
in einer MessageBox ausgegeben werden !
Sub Summe()
MsgBox WorksheetFunction.Sum(Range("A1:A500"))
End Sub