Skoroszyt VBA. Zamknij bez pytania, czy użytkownik chce zapisać?

Piszę program VBA, który konwertuje pliki .xls na pliki .csv. Problem polega na tym, że pojawia się okno dialogowe "Do you want to save the changes to myFile.csv?".Skoroszyt VBA. Zamknij bez pytania, czy użytkownik chce zapisać?

Oto fragment mojego kodu:

currentBook.SaveAs Filename:=fileNameS, FileFormat:=xlCSV, ConflictResolution:=xlLocalSessionChanges  
currentBook.Close SaveChanges:=False

Co muszę dodać, tak aby nie dostać „Czy chcesz zapisać zmiany do myFile.csv” Okno dialogowe?

Źródło

2012-06-27 power

to jest dokładną kopią [Jak uniknąć monit MessageBox zapisać w programie Excel-VBA?] (http://stackoverflow.com/questions/6824816/how-to-avert-the-save-messagebox-prompt-in-excel-vba) i dlatego powinno zostać zamknięte. –

@ Jean-FrançoisCorbett, metoda w tym poście nie działa dla mnie. – power

Dlaczego nie próbujesz "DoCmd.SetWarnings False" – VBwhatnow

Spróbuj użyć ThisWorkbook.Saved = True

 Application.DisplayAlerts = False 
     currentBook.SaveAs Filename:=fileNameS, FileFormat:=xlCSV, ConflictResolution:=xlLocalSessionChanges 
     currentBook.Saved = True    
     currentBook.Close SaveChanges:=False 
     Application.DisplayAlerts = True

Źródło

2012-06-27 08:41:54

To, co zrobiłem w przeszłości i to pracował dla mnie:

Application.DisplayAlerts = False 
    ActiveWorkbook.SaveAs Filename:=fileNameS, FileFormat:=xlCSV, conflictResolution:=xlLocalSessionChanges 
Application.DisplayAlerts = True 
ActiveWorkbook.Close False

Można również spróbować umieścić Close przed DisplayAlerts przywrócona prawda ...

Źródło

2012-06-27 07:05:29 Dan

@ Jean-FrançoisCorbett True, z tym że moja odpowiedź została wysłana przed Alistair Weir. Odniosłem się do podobnej odpowiedzi, która została usunięta. – Dan

Czy sugerujesz, że nie widzisz przyszłości? Nie, poważnie, punkt wzięty, moje przeprosiny! –

Set XC = NTSGetExcell(True) 
XC.Visible = True 
XC.Application.DisplayAlerts = False 
XC.IgnoreRemoteRequests = True 
XC.ActiveWindow.Close False 
XC.Quit 
Set XC = Nothing

Źródło

2013-11-29 09:43:28 user3048858

dlaczego to jest wznawiane? to nie odpowiada na pytanie, jest to odpowiedź tylko kodu i nie kompiluje ... nie rozumiem –

Skoroszyt VBA. Zamknij bez pytania, czy użytkownik chce zapisać?

Odpowiedz

Powiązane problemy