vba按照路径方式打开文档

yxh1202

    能否用VBA语句打开想要使用的文档啊，比如eXCEL文件。就像windows打开文件一样，让用户选择路径的。我都研究了几天了，请高人指点啊，谢谢

yxr_MJTD

可以.

Dim objDBX As Object
     Set objDBX = CreateObject("ObjectDBX.AxDbDocument.16")
             On Error Resume Next
               objDBX.Open filepath

     For S = 0 To objDBX.ModelSpace.Count - 1
                  Set lineobject = objDBX.ModelSpace.Item(S)  

     next

就可以了.

yxh1202

谢谢高手指点，但是怎么用啊