2
我正在为Visual Basic 2010.NET中的SaveFile对话框编写以下几行代码。当XLSX文件被创建并在Microsoft Excel中打开时,代码运行良好。但是,我遇到的问题是,如果程序覆盖文件,用户会得到两个提示。一个提示是从程序自己的SaveFile对话框中确认选择。另一个来自Microsoft Excel询问你是否也一样。就好像程序在后台运行一样。避免“Microsoft Excel”提示
有谁知道我该如何写这段代码来保存文件为Excel文件?
Imports Excel = Microsoft.Office.Interop.Excel
Public Class Frm1
Dim xlApp As Excel.Application
Dim xlWorkBook As Excel.Workbook
Dim xlWorkSheet As Excel.Worksheet
Dim misValue As Object = System.Reflection.Missing.Value
Dim rowcounter As Integer = 1
xlApp = New Excel.Application
xlApp.Visible = False
xlWorkBook = xlApp.Workbooks.Add(misValue)
xlWorkSheet = xlWorkBook.Sheets("Sheet1")
xlWorkSheet.Cells(rowcounter, rowcounter) = "Something goes here."
xlWorkSheet.SaveAs(SaveXLS.FileName)
xlWorkBook.Close()
xlApp.Quit()
End Class
我目前无法测试它,但我很确定它是xlApp.DisplayAlerts = False – Jesse 2012-02-07 06:40:25
@jesse您可能应该发布此作为答案... – brettdj 2012-02-07 12:11:03
@brettdj,可能但我讨厌张贴作为答案,除非我可以测试它。 – Jesse 2012-02-07 17:28:49