如何為Excel文件“另存為”對話框指定默認目錄？

Question

我有一個按鈕，用戶可以按下該按鈕並將網格發送到Excel，它將文件保存在我不希望用戶訪問的目錄中。 （這是一個隱藏的共享）然后立即打開文件供用戶查看。

我正在使用Microsoft.Office.Interop.Excel命名空間，所以我正在使用Excel應用程序和工作簿。

我希望應用程序從目錄中打開文件，但是如果用戶選擇使用SaveAs保存文件（我希望如果用戶單擊Save，它將其視為新文件並打開SaveAs對話框），希望初始目錄類似於C:。

以下是一些相關代碼：

Public Sub sendToExcel()

        'Code here that exports data to Excel

        Dim xlApp As Excel.Application = New Excel.Application()
        Dim xlWorkbook As Excel.Workbook = xlApp.Workbooks.Open(filePath)

        xlApp.Visible = True

End Sub

我嘗試過的最明顯的事情是：

xlApp.DefaultFilePath = "C:\\"

這似乎僅在文件是新文件（尚未保存）時才起作用。

有什么建議么？

Answer 1

是否必須將文件保存在該隱藏共享中？

如果沒有，您可以使用Path.GetTempFileName()將其保存在用戶的臨時文件夾中， Path.GetTempFileName()從此處使用Excel將其打開。

這樣，當他們“另存為”時，他們只會將本地臨時文件夾視為源。

當然，僅當它是桌面應用程序時，此方法才有效。