Hallo zusammen,

ich bin absoluter Makros-Neuling und habe mein jetziges Wissen nur durch Videos. 

Ich habe ein internes Formular erstellt das mittels Button in VBA automatisch als PDF gespeichert und als E-Mail versendet wird. Das Formulare hat 3 Tabellenblätter.

Nun soll das Formular nach dem speichern, automatisch bestimmte Zellen in allen Tabellenblättern leeren. Meine Idee war diese hier:

(Ich habe nur einen Ausschnitt genommen es sind im O<riginal sehr viel mehr Zellen die gelöscht werden sollen)

Worksheets(1).Range("B4").Select
Selection.ClearContents
Range("B5").Select
Selection.ClearContents
Range("B6").Select
Selection.ClearContents                                          (  bis hier funktioniert alles wenn ich dann das zweite Tabellenblatt ansprechen möchte) 

Worksheets(2).Range("A23").Select                         ( dann kommt die Fehlermeldung :Laufzeitfehler 9 / Index ausserhalb des gültigen Bereichs)
Selection.ClearContents
Range("A24").Select
Selection.ClearContents
Range("D23").Select
 

Was mache ich falsch?