Question

我目前有一个表格和一个按钮。当我点击按钮时，它会创建一个excel电子表格并添加＆＃34; hi＆＃34;到范围（＆＃34; A1＆＃34;）。问题是我正在尝试保存并关闭文件，但它仍然提示我＆＃34;如果我想保存＆＃34;，有没有办法可以摆脱这个消息？是不是出于某种原因保存了？

我正在使用代码：

xlWorkbook.save()
Excelapp.quit()

我也尝试过使用下面的代码，但它仍然无效：

me.excelapp.displayalerts=false

由于某种原因，它不想被保存

导入Excel = Microsoft.Office.Interop.Excel
Dim ExcelApp As New Microsoft.Office.Interop.Excel.Application
Dim WB As Microsoft.Office.Interop.Excel.Workbook
Dim WS As Microsoft.Office.Interop.Excel.Worksheet
sub button1（）WB = ExcelApp.Workbooks.Open（＆＃34; Path_To_File＆＃34;） WS = WB.Worksheets（＆＃34; Sheet1＆＃34;）
    'code to change some values here and there

    WB.Save()
    ExcelApp.Quit() end sub

Answer 1

SaveAs对我来说很好......

 WB.SaveAs("filename.xls", True)

Vb2010 Excel不保存

1 个答案: