Problem Saveas Zastąp istniejący plik (Excel VBA)

Mam następujące makro, które jest poprawne, z wyjątkiemSaveAs daje mi błąd, jeśli kliknęNo lubCancel, jeśli kliknęyes działa dobrze.

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

Application.DisplayAlert =True

Ale kiedy przyjdęSaveAs część Otrzymuję następujący błąd, gdy wybieramNo do uratowania. Wiadomość Excel:Plik o nazwie „.........” już istnieje w tej lokalizacji. Czy chcesz to wymienić? Klikam „Nie” lubcancel i uzyskaj błąd czasu działania 1004 .... MetodaSaveAs obiektu_Workbook nie powiodło się.

Nie chcę używaćApplication.DisplayAlerts = False, ponieważ chcę, aby użytkownik wiedział, że istnieje już plik o takiej samej nazwie.

Dlaczego otrzymuję ten błąd? Dlaczego nie mogę wybrać „Nie”Jaką inną opcję muszę pokazać, że plik już istnieje i wybraćNo lubCanceli nie dostaniesz błędu czasu wykonywania.

questionAnswers(1)

yourAnswerToTheQuestion