Blatt sperren für alle Eingaben
19.09.2013 12:16:37
Kai
ich suche ein makro, das folgendes bewirkt:
wenn ein Tabellenblatt geöffnet wird, sollen dem Nutzer Änderungen daran nur möglich sein, wenn es das letzte Tabellenblatt in der Arbeitsmappe ist.
Also etwas wie:
Private Sub Worksheet_Activate()
If Sheets.Count > ActiveSheet.Index Then
Die Tabellenblätter enthalten zahlreiche gesperrte und nicht gesperrte Zellen.
Folgende Lösung geht nicht:
Einfach alle Zellen sperren, wenn ein Blatt nicht mehr das letzte ist.
Es soll nämlich durchaus möglich sein, das letzte Blatt wieder zu löschen. Und dann müssen im bisher vorletzten Blatt wieder die gleichen Zellen gesperrt bzw nicht gesperrt sein wie vorher.
Ich hoffe, das klingt jetzt nicht zu verwirrend.
Weiß jemand eine Lösung?
Vielen Dank für Eure Mühe
Kai