Schreiben sie ein Porgramm, mit dem sie die Zahlen zwischen 1 und einer eingegebenen Zahl addieren können.
Ich weiß nicht wie ich das ganze bei VBA angehen könnte.
For i = 1 To 100
x = x + i
Next i
cuOption Explicit
Sub tt()
Dim x&, y&, mySum&
x = [a1]
For y = 1 To x
mySum = ? + ?
Next
MsgBox "Summe = " & ?
End Sub