打開excel模板並保存文件

我想用瀏覽按鈕打開excel模板，文件需要打開並且必須由用戶直接保存。文件保存後，文件位置需要顯示在文本框中。打開excel模板並保存文件

有了這個，我可以打開Excel本身，但我不知道如何打開模板並保存文檔

Dim Xl As Excel.Application 
Dim Filepath As String 
Dim Workbook As Excel.Workbook 
Dim Worksheet1 As Excel.Worksheet 
Dim Worksheet2 As Excel.Worksheet 

Private Sub BrowseExcelfilenaam_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BrowseExcelfilenaam.Click 
    Xl = CreateObject("Excel.Application") 
     Xl.Workbooks.Open("location\Geluidscherm_template.xls") 
     Xl.Visible = True 
     ExcelFilepath = Xl.GetSaveAsFilename(FileFilter:="Excel Files (*.xls), *.xls") 

     Excelfilenaam.Text = (ExcelFilepath) 
End Sub

該文件打開，我也得到一個另存爲對話框，但是當我想保存它沒有運行的文件; t保存，但它不會給我一個錯誤。

來源

2011-10-13 PandaNL

他們正在編輯實際的模板文件還是他們正在創建一個基於模板文件的新文件？ – JeffO

這些文件需要先保存才能使用。 – PandaNL

Dim objApp As New Excel.Application 

Dim objWorkbook As Excel.Workbook = objApp.Workbooks.Open(FilePath) 

objApp.Visible = True

來源

2011-10-13 16:59:25 N0Alias

打開excel模板並保存文件

回答

相關問題