excel里调用autocad库出问题了？
www.dimcax.com
excel里调用autocad库出问题了？
public sub drawautocadline()
dim autocadapplication as autocad.application
dim startline(0 to 2) as double
dim endline(0 to 2) as double
set autocadapplication = creatobject("autocad.application")
startline(0) = cells(2, 2).value
startline(1) = cells(3, 2).value
endline(0) = cells(2, 3).value
endline(1) = cells(3, 3).value
autocadapplication.activedocument.modelspace.addline startline, endline
end sub
以上代码在excel的vba中写入，已经在引用里加入了autocad
以下是引用sharksun在