Herhalings hulp

[ExcelTonnie]

Ik wil data uit userform halen en in een tabel plaatsen.
Hoe kan ik dit doen met behulp van een loop.
Gaat van 4 t/m 50

Private Sub Data2Table_Click()
'======================================================================================================
'
  WS1.Cells(4, 4).Value = TextBox4
     WS1.Cells(5, 4).Value = TextBox5
      WS1.Cells(6, 4).Value = TextBox6

  


End Sub

Kolommen blijven hetzelfde alleen regel veranderd.

 

[AHulpje]

    For r = 4 To 50
        WS1.Cells(r, 4) = Controls("TextBox" & r)
    Next