Question

我正在创建一个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

Answer 1

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

相反，跳过-占位符参数如下：

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

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

我不了解LotusScript，但是值得一试。这在VBA中是合法的，并且完全等同于上面的内容：

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

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

1 个答案: