2012-02-07 32 views
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 
+2

我目前无法测试它,但我很确定它是xlApp.DisplayAlerts = False – Jesse 2012-02-07 06:40:25

+0

@jesse您可能应该发布此作为答案... – brettdj 2012-02-07 12:11:03

+0

@brettdj,可能但我讨厌张贴作为答案,除非我可以测试它。 – Jesse 2012-02-07 17:28:49

回答

5

我想你想要DisplayAlerts=false。看看this question的答案。