Excel运行时错误“；无法获取OLEObjects类“的add属性”；

我正在创建一个LotusScript脚本，它创建了一个包含嵌入对象的Excel文件。但是当我真正嵌入PDF文件时，我得到“无法获得OLEObjects类的Add属性”。 不幸的是，Lotusscript不能处理命名参数，所以我必须按正确的顺序移交所有参数。不确定是否可以省略尾随的可选参数

tempdir = "c:\data\temp"
pdfname = "20140826-32051-1890459257-300-421425-GRF.pdf"
Set xlApp = CreateObject("Excel.Application")
xlApp.Workbooks.Add
Set xlsheet = xlApp.Workbooks(1).Worksheets(1)
Set oleObjs = xlsheet.OLEObjects
Set oleObj = OLEObjs.Add("", tempdir + "\" + pdfname, False, _
True, "", "", pdfname, _
"","","","")
'Arguments: ClassType, FileName, Link,
'DisplayAsIcon, IconFileName, IconIndex, IconLabel,
'Left, Top, Width, Height

---

如果要“跳过”可选参数，请不要传递空字符串：函数正在接收空字符串并尝试使用它运行

相反，跳过它们-占位符参数如下所示：

Set oleObj = OLEObjs.Add(, tempdir + "\" + pdfname, False, True, , , pdfname, , , , )

不确定是否可以省略尾随的可选参数

tempdir = "c:\data\temp"
pdfname = "20140826-32051-1890459257-300-421425-GRF.pdf"
Set xlApp = CreateObject("Excel.Application")
xlApp.Workbooks.Add
Set xlsheet = xlApp.Workbooks(1).Worksheets(1)
Set oleObjs = xlsheet.OLEObjects
Set oleObj = OLEObjs.Add("", tempdir + "\" + pdfname, False, _
True, "", "", pdfname, _
"","","","")
'Arguments: ClassType, FileName, Link,
'DisplayAsIcon, IconFileName, IconIndex, IconLabel,
'Left, Top, Width, Height

我不知道LotusScript，但值得一试。这在VBA中是合法的，完全等同于上述内容：

Set oleObj = OLEObjs.Add(, tempdir + "\" + pdfname, False, True, , , pdfname)

---

谢谢，就这样。省略后面的emtpy参数也可以。