如何從內VB6

Question

我試圖從VB6應用程序從而中創建一個Excel電子表格創建一個新的Excel電子表格...

Set xl = New Excel.application 
Set xlwbook = xl.Workbooks.Open(file_name) 
Set xlsheet = xlwbook.Sheets.Item(1) 

其次

xlsheet.Cells(1, 1) = "Blah blah blah" 

等。

我特別想在每次執行此操作時創建一個新文件。此刻它返回一個文件未找到錯誤。

我想知道這是否是正確的方法，如果是這樣，我可以如何請求由.Open方法（或任何我應該使用的方法）創建一個新文件。

Answer 1

OPEN意味着您試圖打開的現有工作表。

您應該創建一個新工作表。

試試這個

Set xl = New Excel.application 
Set xlwbook = xl.Workbooks.Add 
Set xlsheet = xlwbook.Sheets.Item(1) 

這將創建一個未保存的表。一旦你完成了所有的工作，你必須保存它。

xl.ActiveWorkBook.Save ("c:\myfilename.xls")