Excel VBA未能访问带有后期绑定的CorelDraw页面属性

Question

我有一个Excel (Office16) VBA代码，它打开一个CorelDraw文档，并根据文档中每个页面的方向执行任务。守则如下：

Dim app As Object
Dim page As Object

Set app = CreateObject("CorelDRAW.Application")
app.OpenDocument "xxx.pdf"

For Each page In app.ActiveDocument.Pages
If page.Orientation = cdrLandscape Then
...
End If
Next

代码无法执行"If“语句，即使我可以在局部变量窗口中看到页面的定向属性。这里怎么了？(在这种情况下，延迟绑定是必要条件)

Answer 1

如果使用后期绑定，则需要在代码中声明cdrLandscape，或者可以替换数值(1)