Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: schreibgeschützt öffnen verhindern

schreibgeschützt öffnen verhindern
max
Hallo Excel Freund,
unter Version 2000 und 2003 kann man eine von einem anderen User bereits geöffnete Datei nochmals schreibgeschützt öffnen. Gibt es eine Möglichkeit dies zu verhindern.
Hintergrund: Sobald die Datei geöffnet wird, läuft ein Makro ab, der Daten in der Datei verändert. Danach wird die Datei automatisch gespeichert. Dies ist ein zwingender Vorgang.
Wird die Datei nun von einem weiteren User geöffnet, kann die Datei ja nur unter einem anderem Namen gespeichert werden. Das soll aber unterbunden werden.
Kann mir jemand helfen? Ich bedanke mich im Voraus
Gruß max
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: schreibgeschützt öffnen verhindern
26.10.2009 16:03:53
F1

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Cancel = SaveAsUI
End Sub
F1
AW: schreibgeschützt öffnen verhindern
27.10.2009 10:41:50
max
hi f1,
danke für deine antwort. die datei kann aber
1. trotzdem schreibgeschützt geöffnet werden und
2. speichern ist auch möglich, wenn auch unter einem neuen namen.
es sollte aber weder 1. und schon gar nicht 2. möglich sein.
gruß max
Anzeige
AW: schreibgeschützt öffnen verhindern
26.10.2009 16:16:00
JogyB
Hi.
Private Sub Workbook_Open()
If ThisWorkbook.ReadOnly Then ThisWorkbook.Close False
End Sub
Schließt die schreibgeschützt geöffnete Mappe direkt wieder. Das bringt aber alles nur was, wenn der Nutzer die Ausführung von Makros nicht unterbindet.
Gruss, Jogy
Anzeige
AW: schreibgeschützt öffnen verhindern
27.10.2009 10:23:18
max
Hallo Jogy,
mein Nutzerkreis bekommt nur Dateien mit Makros. Sie wissen das und öffnen meine Dateien deshalb nur mit Makro zulassen bzw. unter 2007 aus vertrauenswürdigem Speicherort. Danke für deine anwort, werde ich gleich ausprobieren.
max
AW: schreibgeschützt öffnen verhindern
27.10.2009 10:34:02
max
Hi Jogy,
funktioniert tadellos. Optimal wäre es natürlich, wenn der neue User eine Nachricht bekäme, das ein erneutes öffnen nicht möglich ist.
max
Anzeige

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Schreibgeschützt Öffnen Verhindern in Excel


Schritt-für-Schritt-Anleitung

Um zu verhindern, dass eine Excel-Datei schreibgeschützt geöffnet wird, kannst du die folgenden Schritte ausführen:

  1. Öffne die Visual Basic for Applications (VBA) Entwicklungsumgebung:

    • Drücke ALT + F11, um den VBA-Editor zu öffnen.
  2. Füge den folgenden Code in das "DieseArbeitsmappe"-Modul ein:

    Private Sub Workbook_Open()
       If ThisWorkbook.ReadOnly Then
           MsgBox "Diese Datei kann nicht schreibgeschützt geöffnet werden.", vbExclamation
           ThisWorkbook.Close False
       End If
    End Sub
    • Dieser Code zeigt eine Nachricht an und schließt die Datei, wenn sie im schreibgeschützten Modus geöffnet wird.
  3. Speichere die Datei:

    • Stelle sicher, dass die Datei als Makro-fähige Arbeitsmappe (.xlsm) gespeichert wird, um den VBA-Code zu erhalten.
  4. Teste die Funktionalität:

    • Öffne die Datei von einem anderen Benutzer und stelle sicher, dass sie nicht schreibgeschützt geöffnet werden kann.

Häufige Fehler und Lösungen

  • Fehler: Datei kann dennoch schreibgeschützt geöffnet werden

    • Überprüfe, ob Makros in den Excel-Optionen aktiviert sind. Wenn Makros deaktiviert sind, wird der VBA-Code nicht ausgeführt.
  • Fehler: Der Code funktioniert nicht in Excel 2016

    • Achte darauf, dass du die Datei als .xlsm speicherst. In älteren Versionen (2000, 2003) kann es zu unterschiedlichen Verhalten kommen.

Alternative Methoden

  • Zugriffsrechte ändern:

    • Du kannst die Datei mit bestimmten Berechtigungen speichern, sodass nur bestimmte Benutzer Änderungen vornehmen können.
  • Passwortschutz:

    • Setze ein Passwort, um sicherzustellen, dass nur autorisierte Benutzer auf die Datei zugreifen können. Dies kann unter "Datei" > "Informationen" > "Arbeitsmappe schützen" eingestellt werden.

Praktische Beispiele

  • Beispiel 1: Eine Datei, die von mehreren Anwendern genutzt wird. Der oben genannte VBA-Code sorgt dafür, dass kein Benutzer die Datei schreibgeschützt öffnen kann.
  • Beispiel 2: Wenn du eine Excel-Datei für Berichte nutzt, könnte ein Makro verwendet werden, um alle schreibgeschützten Öffnungsversuche abzufangen und eine Nachricht anzuzeigen, die erklärt, dass die Datei nur im Bearbeitungsmodus geöffnet werden kann.

Tipps für Profis

  • Nutze den VBA-Code, um auch spezifische Benutzer zu benachrichtigen, wenn sie versuchen, die Datei schreibgeschützt zu öffnen.
  • Teste den Code in verschiedenen Excel-Versionen, um sicherzustellen, dass er überall funktioniert.
  • Halte deine Excel-Datei regelmäßig aktualisiert, um sicherzustellen, dass alle Makros korrekt funktionieren.

FAQ: Häufige Fragen

1. Was bedeutet "Excel-Datei ist schreibgeschützt"?
Eine schreibgeschützte Excel-Datei kann zwar geöffnet, jedoch nicht bearbeitet werden. Änderungen können nur als Kopie gespeichert werden.

2. Wie kann ich die Aufforderung zum schreibgeschützten Öffnen einer Arbeitsmappe in Excel 2016 verhindern?
Verwende den oben beschriebenen VBA-Code, um sicherzustellen, dass die Datei nicht im schreibgeschützten Modus geöffnet wird.

3. Was soll ich tun, wenn meine Excel-Datei immer schreibgeschützt öffnet?
Überprüfe die Datei-Eigenschaften auf deinem Computer und stelle sicher, dass die Datei nicht von einem anderen Benutzer genutzt wird. Stelle sicher, dass die Datei nicht im Netzwerk schreibgeschützt ist.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige