Hallo zusammen,

Ich versuche gerade mit einer kleinen Userform mit 2 Textboxen eine bestehende Formatierte Tabelle zu befüllen.

Es soll einfach der Inhalt aus der ersten TextBox in die erste freie zelle in der Spalte B (heisst in dem List Object SKU)

Und der Inhalt der zweiten Textbox soll in die Spalte K

mit meinem bisherigen Code wir immer erst unterhalb der Tabelle angefangen zu schreiben.

kann mir jemand helfen? damit direkt in die Tabelle geschreiben wird.

Private Sub CB_OK_Click()

   Dim wks As Worksheet
   Dim lngZeile  As Long
   Set wks = ThisWorkbook.Worksheets("Manuell")
   
   
   lngZeile = Cells(Rows.Count, 2).End(xlUp).Row + 1
   wks.Cells(lngZeile, 2).Value = TextBox1.Value
   wks.Cells(lngZeile, 11).Value = TextBox2.Value
   
End Sub

Beste Grüße

Pascal