如何从VB6中创建新的Excel电子表格

如何从VB6中创建新的Excel电子表格,excel,vb6,Excel,Vb6,我正在尝试从VB6应用程序中创建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" 等等 我特别想在每次执行此操作时创建一个新文件。此时,它返回一个“未找到文件”错误 我想知道这是否是正确的方法,如果是,我如何请求使用

我正在尝试从VB6应用程序中创建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方法(或我应该使用的任何方法)创建新文件。

Open意味着您正在尝试打开的现有工作表

您应该创建一个新的工作表

试试这个

Set xl = New Excel.application
Set xlwbook = xl.Workbooks.Add
Set xlsheet = xlwbook.Sheets.Item(1)
这将创建一个未保存的工作表。一旦你完成了所有的工作,你必须保存它

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