如何从内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")