Excel в CSV-файл "сохранить как" всплывающее сообщение вопрос
Здравствуйте , друзья, я использую приведенный ниже код для преобразования файла excel в CSV через VB-код. Когда я запускаю приложение и загружаю файл , система показывает сообщение "Do you wan to save changes on file". Я не хочу, чтобы это сообщение отображалось моему конечному пользователю.
Пожалуйста, проводите.
Что я уже пробовал:
Dim xlsApp As New Excel.Application Dim xlsWorkBook As Excel.Workbook Dim xlsWorkSheet As Excel.Worksheet xlsApp = New Excel.Application xlsWorkBook = xlsApp.Workbooks.Open(excelPath) xlsWorkSheet = xlsWorkBook.Worksheets(1) ' You could also do it by name: "sheet1" 'xlsWorkSheet.Rows("1:5").Delete() 'xlsWorkSheet.Rows("37:100").Delete() xlsWorkBook.SaveAs(csvPath, FileFormat:=Excel.XlFileFormat.xlCSV, CreateBackup:=False) xlsWorkBook.Close()
Richard MacCutchan
Если в SaveAs нет возможности подавить сообщение, то вы ничего не можете с этим поделать.