|
Hallo liebe Freunde,
ich habe ein kleines Problem und bin mir sicher, dass ihr mir ohne Probleme helfen könnt :).
Ich möchte, dass bei einem Sheetwechsel ein paar Zellen gelöscht werden, auf dem Ursprungssheet.
Private Sub Worksheet_Deactivate()
ActiveSheet.Range("D7,I7,N7,N13,N19,I19,I13,D13,D19").Select 'Soll eigentlich nicht das ActiveSheet sein sondern die Tabelle 2
Selection.ClearContents
End Sub
'mache ich aber
Private Sub Worksheet_Deactivate()
Sheets("Startseite").Range("D7,I7,N7,N13,N19,I19,I13,D13,D19").Select 'Soll eigentlich nicht das ActiveSheet sein sondern die Tabelle 2
Selection.ClearContents
End Sub
'bekomme ich einen Fehler :(
Fazit: Ich möchte, wenn ich von "Startseite auf das nächste Blatt wechsel, dass auf der Startseite etwas gelöscht wird.
Vielen Dank im Voraus! :)
Beste Grüße aus FFM
|