HERBERS Excel-Forum - das Archiv
Thema: Speichern unter erlauben, aber Speichern nicht?
Speichern unter erlauben, aber Speichern nicht?
@Hinti
Hallo,
ich möchte mit "Cancel = True" Speichern nicht erlauben,
aber wer "Speichern unter" drückt, das soll schon gehen!
geht das?
LG Jürgen
AW: Speichern unter erlauben, aber Speichern nicht?
UweD
Hallo
wie schon vermutet nutze das "Workbook_BeforeSave- Ereignis"
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Cancel = True
Application.EnableEvents = False
Application.Dialogs(xlDialogSaveAs).Show
Application.EnableEvents = True
End Sub
Gruß UweD
Wenn dort aber kein anderer Name eingegeben wird, kann die Datei trotzdem unter gleichem namen gespeichert werden.
AW: Speichern unter erlauben, aber Speichern nicht?
@Hinti
Danke UweD
Speichern unter erlauben, aber Speichern nicht?
@Hinti
Hallo,
ich möchte mit "Cancel = True" Speichern nicht erlauben,
aber wer "Speichern unter" drückt, das soll schon gehen!
geht das?
LG Jürgen
AW: Speichern unter erlauben, aber Speichern nicht?
UweD
Hallo
wie schon vermutet nutze das "Workbook_BeforeSave- Ereignis"
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Cancel = True
Application.EnableEvents = False
Application.Dialogs(xlDialogSaveAs).Show
Application.EnableEvents = True
End Sub
Gruß UweD
Wenn dort aber kein anderer Name eingegeben wird, kann die Datei trotzdem unter gleichem namen gespeichert werden.
AW: Speichern unter erlauben, aber Speichern nicht?
@Hinti
Danke UweD
Excel-Beispiele