2012-02-07 70 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的答案。