Keine Kopie abspeichern dürfen
24.09.2020 10:33:12
Lisa
vielleicht könnt ihr mir hierbei helfen:
Ich habe eine Arbeitsmappe, die mehrere User verwenden.
Wenn bereits eine Person in der Datei ist, öffnen häufig weitere User die Datei im Schreibgeschützten Modus.
Sie darf auch lesbar sein, aber es soll im schreibgeschützten Modus verhindert werden, dass Änderungen gemacht und zahlreiche Kopie-Versionen erstellt werden. --> Es darf immer nur das Original bestehen.
Bisher konnte ich umgehen, dass beim Schließen der schreibgeschützten Datei das Speichern abgefragt wird. Dennoch sind da noch immer noch Lücken da, sodass dennoch die Datei als Kopie abgespeichert werden kann:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
If ThisWorkbook.ReadOnly Then ThisWorkbook.Saved = True
End Sub
--> Endziel ist es sozusagen: Die Datei soll zum Austausch im schreibgeschützten Modus lediglich "lesbar" sein - und sonst nichts.
Liebe Grüße in die Community!
Lisa