Hi Tommy_M.
In dem Fall wird das 10. Blatt nicht das Blatt sein, an welches du denkst.
1. Sheets() verwendet man für Blätter beliebigen Types (Tabellenblatt, Diagramblatt);
ein Diagramblatt hat z.B. keine Range und würde dir bei Sheets(5).Range("A1") einen Laufzeitfehler um die Ohren hauen, wenn das 5 Blatt ein Diagramblatt ist
Worksheets() wird ausschließlich für Tabellenblätter verwendet
Worksheets(5) ist nicht das selbe wie Sheets(5)
2. verwende am besten keine Indizes, sondern die Namen der Blätter, um diese anszusprechen - denn Namen sind eindeutig;
ändert man die Reihenfolge der Blätter, dann ändern sich auch deren Indizes und dann hast du ein Problem
mit Namen hast du das Problem nicht
3. wenn man nur die Eingaben löschen will, verwende Range.ClearContents anstatt Range.Clear (letzteres löscht nämlich einfach alles, auch Formatierungen)
Worksheets("Tabelle2").Range("A1", "B2").Clear
Worksheets("Tabelle3").Range("A1", "B2").Clear
Worksheets("Tabelle4").Range("A1", "B2").Clear
Worksheets("Tabelle5").Range("A1", "B2").Clear
Worksheets("Tabelle6").Range("A1", "B2").Clear
Worksheets("Tabelle10").Range("A1", "B2").Clear
Die Namen der Blätter musst du entsprechend anpassen.
Grüße
|