Question

我在Windows 7中使用cscript运行VB脚本。以下代码生成运行时＆＃34;无效的过程调用或参数＆＃34;使用ListObjects创建表时出错。

Set ExcelObject = CreateObject("Excel.Application")
ExcelObject.visible = True
ExcelObject.WorkBooks.Add 'Adds a workbook to an excel object
Set mySheet = ExcelObject.Sheets(1)
mySheet.Activate
mySheet.ListObjects.Add(xlSrcRange, mySheet.Range("A1:D10"), , xlYes).Name = "myTable"

Answer 1

不知道你遇到了什么问题......我冒昧地猜测你可能想要抓住从workbooks.add方法中吐出的工作簿对象。然后，您可以使用该表单，因为worksheets或sheets不是Excel应用程序的集合，而是工作簿。

Set ExcelObject = CreateObject("Excel.Application")
ExcelObject.visible = True
set wb = ExcelObject.WorkBooks.Add 'Adds a workbook to an excel object
Set mySheet = wb.Sheets(1)
mySheet.Activate
mySheet.ListObjects.Add(xlSrcRange, mySheet.Range("A1:D10"), , xlYes).Name = "myTable"

使用VBscript在Excel中创建表会产生无效错误

1 个答案: