Saveas Problem Vorhandene Datei überschreiben (Excel VBA)

Ich habe das folgende Makro, das bis auf das richtig istSaveAs gibt mir einen Fehler, wenn ich klickeNo oderCancel, wenn ich klickeyes funktioniert gut.

ActiveWorkbook.SaveAs Filename:=FileName, FileFormat:=xlWorkbook, ConflictResolution:=xlLocalSessionChanges

Application.DisplayAlert =True

Aber wenn ich dazu kommeSaveAs teil ich bekomme folgenden fehler wenn ich auswähleNo zum speichern. Excel-Nachricht:An dieser Stelle existiert bereits eine Datei mit dem Namen ".........". Möchten Sie es ersetzen? Ich klicke auf 'Nein' odercancel und erhalte den Laufzeitfehler 1004 .... MethodeSaveAs des Objekts_Workbook gescheitert.

Ich möchte das nicht benutzenApplication.DisplayAlerts = False, weil ich möchte, dass der Benutzer weiß, dass bereits eine Datei mit demselben Namen vorhanden ist.

Warum bekomme ich diesen Fehler? Warum kann ich nicht "Nein" auswählenWelche andere Option muss ich anzeigen, dass die Datei bereits vorhanden ist und auswählenNo oderCancelund nicht den Laufzeitfehler bekommen.

Antworten auf die Frage(1)

Ihre Antwort auf die Frage