cdreldraw导入pdf文件时强制分页

cdreldraw可以以拖动或菜单打开的方式导入pdf文件，视pdf文件自身设置的差异，在pdf阅读器中分页完善的pdf文件，拖入cdreldraw后会失去分页信息，导致所有页面堆叠在同一个群组内，增加了编辑的难度。

碰到这种情况可以尝试下利用vba导入文件的方式，在vba中，我们可以利用“MaintainLayers”这个参数来强制指定分页，完整示例程序如下，程序中导入文件的路径需要自行指定正确的路径：

Sub Macro1()
    Dim impflt As ImportFilter
    Dim io As New StructImportOptions
    With io
        .MaintainLayers = True
    End With
    Set impflt = ActiveLayer.ImportEx("文件路径名", cdrAI9, io)
    impflt.Finish
End Sub