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
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen