11-11-20 01:11 PM
12-11-20 10:45 PM
newworkbookname = ExecWithTimeout(Timeout, "Save Workbook As",
Function()
Dim wb as Object = GetWorkbook(handle,workbookname)
Dim excel as Object = wb.Application
excel.DisplayAlerts = False
wb.SaveAs(filename, fileformat, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, Type.Missing, True)
excel.DisplayAlerts = True
Return wb.Name
End Function)
p.s. That "True" in the end is irrelevant for you, but it tells excel that csv(fileformat=6) for example to be saved using local language settings.