Arbeitsmappe schreibgeschützt
11.04.2018 07:38:01
Zoe401
ich habe endlich meine Excel Protokoll-Vorlage fertig bekommen.
Jetzt würde ich diese gerne schreibschützen, damit diese niemand überschreiben kann.
Beim öffnen der Mappe soll gleich das Fenster aufgehen mit "Speichern unter", damit man es sich Das Protokoll gleich dortin speichert wo es hingehört (und die Vorlage unverändert dort bleibt wo sie ist).
Bis jetzt habe ich das so unter Workbook - BeforeSave
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Application.Dialogs(xlDialogSaveAs).Show
If ActiveWorkbook.Saved = True Then
Cancel = True
End If
End Sub
Aber ich habe gemerkt, dass es so trotzdem zu überschreiben ist. Es kommt "Die Datei ist bereits vorhanden. Möchten Sie diese ersetzen?"
Aber genau das soll nicht kommen. Wie bekomme ich das hin?
Grüße,
Zoe