folgendes Problem:
Die beiden Funktionen 'Speichern' und 'Speichern unter' deaktiviert!
Wie kann ich sie wieder aktivieren?
Habe das Forum durchsucht aber nix gefunden.
Danke für eure Hilfe.
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If Darf <> "J" Then
Cancel = True
MsgBox "Datei nicht gesichert. Du darfst das nicht!"
End If
End Sub