2016-04-11 15 views
0
open_book.SaveAs Filename:="E:\MF\data\" & com_tick_ask & ".xlsx", FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False 

Dies ist mein Code, um eine Datei als xlsx zu speichern, aber ich möchte eine vorhandene Datei überschreiben. und schließen Sie diese Arbeitsmappe. Kann jemand helfen ...überschreiben vorhandene Datei Excel VBA

Antwort

0

Sorry Freunde für Ärger. Ich habe eine Antwort bekommen.

Ich habe nur diese Codezeile setzen unmittelbar vor meiner SaveAs Aussage ...

Application.DisplayAlerts = False

und haben diese Codezeile setzen unmittelbar nach dem ...

Application.DisplayAlerts = True

z

Application.DisplayAlerts = False 
open_book.SaveAs Filename:="E:\MF\data\" & com_tick_ask & ".xlsx", FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False 
Application.DisplayAlerts = True