Hallo Sabrina,
Laufzeitfehler ´9´, Index außerhalb des gültigen Bereiches.
bletzte = Worksheets(Zelle.Text).Cells(Rows.Count, 2).End(xlUp).Row + 1 Kannst du mir da nocheinmal helfen?