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.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | Private Sub Worksheet_Deactivate()
ActiveSheet.Range( "D7,I7,N7,N13,N19,I19,I13,D13,D19" ). Select
Selection.ClearContents
End Sub
Private Sub Worksheet_Deactivate()
Sheets( "Startseite" ).Range( "D7,I7,N7,N13,N19,I19,I13,D13,D19" ). Select
Selection.ClearContents
End Sub
|
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
|