hallo zusammen

ich lasse mir Text aus der Combobox in eine Tabelle schreiben..

Private Sub combobox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)

If KeyCode = 13 Then
Dim x As Long
Dim i As Integer
Dim y As Integer
x = Cells(Rows.Count, 1).End(xlUp).Row + 1
Tabelle1.Cells(x, 1) = ComboBox1.Text
End If
End Sub


gibt es eine Möglichkeit das die Zeilen begrenzt werden wo die Einträge reingeschrieben werden und zum Beispiel nach der 5. beschriebenen Zeile, es wieder bei A1 anfängt bis A6)

vielen dank für eure Hilfe