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?
|