Visual Basic in Kombi mit Excell

Hey, ist das so richtig? folgende aufgabe:
du hast Spalte A und Spalte B.
in Spalte A stehen untereinander die Werte von -10 bis 10. Spalte B enthält das jeweilige Quadrat der Spalte A plus das Dreifache der Spalte A.

Private Sub CommandButton1_Click()
For i = -10 To 10
Cells(i + 11, 1) = i
Next i
For i = -10 To 10
Cells(i + 11, 2) = Cells(i + 11, 1) * Cells(i + 11, 1) + Cells(i + 11, 1) * 3
Next i


End Sub

Private Sub CommandButton2_Click()
For i = -10 To 10
Cells(i + 11, 1) = ""
Next i
For i = -10 To 10
Cells(i + 11, 2) = ""
Next i
End Sub

"start" ist der 1. button, "löschen" der zweite..