如何在 VB6 中创建新的 Excel 电子表格答案

【问题标题】：How to create a new Excel spreadsheet from within VB6如何在 VB6 中创建新的 Excel 电子表格
【发布时间】：2010-12-22 14:12:20
【问题描述】：

我正在尝试从 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 方法（或我应该使用的任何方法）创建一个新文件。

【问题讨论】：

标签： excel vb6

【解决方案1】：

OPEN 表示您正在尝试打开的现有工作表。

您应该正在创建一个新工作表。

试试这个

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

这将创建一个未保存的工作表。完成所有工作后，您必须保存它。

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

【讨论】：