Datei schreibgeschützt öffnen verhindern

Forumthread: Datei schreibgeschützt öffnen verhindern
1 Beitrag zu diesem Forumthread
Anzeige

Forumthread: Datei schreibgeschützt öffnen verhindern

28.07.2025 20:45:21

Anke B

Guten Abend,
ich würde gern eine Datei, die von mehreren Abteilungen genutzt wird, so umgestalten, dass, wenn die Datei von einem anderen User geöffnet ist, eine Message Box erscheint, die sagt: "Datei wird von einem anderen User benutzt. Bitte versuche es später noch einmal". Dann soll die Datei nicht geöffnet werden.
Die Funktion "Schreibgeschützt öffnen" sollte verhindert werden.

Ist das möglich?
Ich freue mich auf Eurer Fachwissen.
Gruß
Anke

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Datei schreibgeschützt öffnen verhindern

29.07.2025 10:47:22

Aran

AW: Datei schreibgeschützt öffnen verhindern

29.07.2025 10:47:22

Aran

Hi,

Das Öffnen der Datei wird sich nicht verhindern lassen, da ja erst dann eine Abfrage erfolgen kann.
Vielleicht wäre es ja eine Lösung für Dich, wenn die Datei gleich wieder geschlossen wird, wenn sie schreibgeschützt ist.
Das könnte dann so aussehen:
Die Datei wird geöffnet, und wenn sie schreibgeschützt ist, nach einer Messagebox gleich wieder geschlossen.



Private Sub workbook_open()

    If ThisWorkbook.ReadOnly = True Then

        MsgBox ("Datei wird von einem anderen User benutzt. Bitte versuche es später noch einmal")

        ThisWorkbook.Close

    End If

End Sub

Vielleicht hilft Dir das ja weiter

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!