Mit Userform Daten in eine Tabelle eintragen

[MisterBurns]

Nur als Anmerkung...

Code:

last = .Cells(.Rows.Count, 1).End(xlUp).Row + 1

ist unter Garantie nicht die letzte beschriebene Zeile.