Excel-Datei nach einem bestimmten Datum sperren
Schritt-für-Schritt-Anleitung
Um eine Excel-Datei so zu konfigurieren, dass sie nach einem bestimmten Datum nicht mehr geöffnet werden kann, kannst du ein einfaches VBA-Makro verwenden. Befolge die folgenden Schritte:
-
Öffne die Excel-Datei, die du schützen möchtest.
-
Drücke ALT + F11, um den VBA-Editor zu öffnen.
-
Wähle im Projekt-Explorer links deine Arbeitsmappe aus.
-
Klicke mit der rechten Maustaste auf "DieseArbeitsmappe" und wähle "Code anzeigen".
-
Füge den folgenden VBA-Code ein:
Private Sub Workbook_Open()
Dim Ende As Date
Ende = "20.10.2004" ' Setze hier dein gewünschtes Datum ein
If Environ("UserName") = "Anmeldename" Then Exit Sub ' Ersetze "Anmeldename" mit deinem Namen
If Date > Ende Then
MsgBox "Sorry, zu spät"
ThisWorkbook.Close
End If
End Sub
-
Schließe den VBA-Editor und speichere die Datei als Excel-Makro-aktivierte Datei (*.xlsm).
-
Teste die Datei, indem du das Datum auf ein Datum nach dem festgelegten Datum (z. B. 21.10.2004) änderst und die Datei öffnest.
Häufige Fehler und Lösungen
-
Fehler: "Der Code wird nicht ausgeführt"
Stelle sicher, dass du die Datei als Makro-aktivierte Datei (*.xlsm) gespeichert hast. Andernfalls wird der VBA-Code nicht ausgeführt.
-
Fehler: "Die Nachricht wird nicht angezeigt"
Überprüfe, ob das Datum korrekt eingegeben wurde. Das Datum im Code sollte im Format "TT.MM.JJJJ" angegeben werden.
-
Fehler: "Die Datei schließt sich nicht"
Stelle sicher, dass die Zeile ThisWorkbook.Close nicht auskommentiert ist, damit die Datei tatsächlich geschlossen wird, wenn das Datum überschritten ist.
Alternative Methoden
Wenn du kein VBA verwenden möchtest, kannst du auch bedingte Formatierung nutzen, um Benutzer zu warnen, bevor sie Daten nach einem bestimmten Datum eingeben:
- Markiere die Zellen, in die Daten eingegeben werden sollen.
- Gehe zu "Start" > "Bedingte Formatierung" > "Neue Regel".
- Wähle "Formel zur Ermittlung der zu formatierenden Zellen verwenden".
- Gib die Formel
=HEUTE()>DATUM(2004;10;20) ein und wähle eine Formatierung (z. B. rote Schriftfarbe), um die Zellen hervorzuheben.
Diese Methode verhindert nicht das Öffnen der Datei, warnt jedoch vor der Eingabe von Daten nach einem bestimmten Datum.
Praktische Beispiele
Ein typisches Beispiel für die Anwendung dieser Methode ist in einem Excel-Wochenplan. Du möchtest sicherstellen, dass der Plan nur bis zu einem bestimmten Datum bearbeitet werden kann. Der oben genannte VBA-Code kann verwendet werden, um sicherzustellen, dass nach diesem Datum keine Änderungen mehr vorgenommen werden können.
Tipps für Profis
- Sichere deine Makros: Stelle sicher, dass du eine Sicherheitskopie der Datei hast, bevor du Änderungen vornimmst.
- Anpassung des Datums: Du kannst das Datum im VBA-Code einfach ändern, um es an deine Bedürfnisse anzupassen.
- Benutzeranpassung: Passe den Code an, um verschiedene Benutzer unterschiedlich zu behandeln, indem du mehrere
If-Anweisungen hinzufügst.
FAQ: Häufige Fragen
1. Kann ich das Datum dynamisch gestalten?
Ja, du kannst das Datum auch auf ein zukünftiges Datum basierend auf dem heutigen Datum setzen. Zum Beispiel: Ende = DateAdd("d", 30, Date) würde die Datei nach 30 Tagen schließen.
2. Was passiert, wenn ich das Makro deaktiviere?
Wenn du das Makro deaktivierst, wird die Datei wie gewohnt geöffnet, und der Schutz wird nicht angewendet. Du musst das Makro aktivieren, um den Schutz zu nutzen.