Question

vb.net对一个已存在的EXCEL操作怎么做到写入数据后在原文件中保存当前的数据

我用以下的代码可以写入想要的数据，但是每次末尾保存是都会提示当前路径下已经存在了以个文件名相同的EXCEL必须手动点击另存为覆盖才醒 ，我不想手动点另存为，只想直接自动保存然后关闭，因为我是循环调用的。每次都手动另存为我还得每次都点一下。以下是代码，执行到 Ex.Save() 时就会跳出另存为的提示，有什么办法让他自动保存在当前打开的文件中啊 。
Dim Ex As Microsoft.Office.Interop.Excel.Application
Dim ExSheet As Microsoft.Office.Interop.Excel.Worksheet
Ex = New Microsoft.Office.Interop.Excel.Application
ExSheet = Ex.Workbooks.Open("E:\XXXX.xlsx").Sheets("Sheet2")

ExSheet.Activate()
Ex.Visible = False
Dim myDay As String = DateTime.Now.Day
Dim inmyDay As Integer = Integer.Parse(myDay)
ExSheet.Cells(SiteRows, 1) = SiteAddress
ExSheet.Cells(Rowspv, 1) = "AA"
ExSheet.Cells(Rowsuu, 1) = "BB"
ExSheet.Cells(Rowspv, inmyDay) = Label3.Text
ExSheet.Cells(Rowsuu, inmyDay) = Label4.Text
Ex.Save()
Ex.Quit()
Ex = Nothing

Answer 1

这个应该版本比较高吧，我的2003下，application没有save方法。你现在保存的是application，不是单独一个工作簿，2003版本下，单独保存一个工作簿是不会提示的，你试试单独保存工作簿，要引用一个workbook对象。
或则看看save方法是否有参数，可以避免弹出提示框。

Answer 2

在Ex.save之前加一行
Ex.displayalerts=false
就可以了
最好在Ex.save之后改回去
Ex.displayalerts=true