[VBA]紧急求助 14向2004的多文档移植

footkid

紧急有段多文档打开,逐文件进行修改的程序在以前的14中正常，现在准备移植到2004中，2000就支持多文档，这就出现了调用上判断问题。试着在2004设成单文档兼容模式，将打开方式设成Set AcadDoc = AcadApp.Documents，以前的14中是Set AcadDoc = AcadApp.ActiveDocument,但是运行中出现对象"AddPolyline"的方法"IAcadmodelspace"失败，但是在14中是完全正常的。请高手赐教。 部分的程序段如下：Set AcadDoc = AcadApp.Documents

Set AcadActive = AcadApp.ActiveDocument
Set MoSpace = AcadActive.ModelSpace

Dim AnObj As Object    
  
         Set AnObj = MoSpace.AddPolyline(InfPoint)
   

footkid

自顶，还是没人开发过多文档的调用程序？呵呵。

footkid

已经解决，呵呵，看来这里的高手不多啊。