Excel & Autocad VBA

[Wil_Wizard]

Hello Sirs,

In the very first beggining integrating CAD and Excel, I´m using the following code to open Autocad from Excel.

---------------------------
Sub OpenCad
Dim CadAppl as Autocad.Application

On Error Resume Next
Set CadAppl = GetObject(,"Autocad.Application")
If Err <> 0 then
Err.Clear
Set CadAppl = CreateObject("Autocad.Application")
If Err <> 0 then
MsgBox "Could not Start Cad", vbExclamation
End
End If
End If
CadAppl.Visible = True

End Sub
---------------------------

I´m using Autocad LT 2002 and not sure if this one is compatible with VBA usage.

Regards,

Wil_Wizard

 

[Wil_Wizard]

To Complete Question

Just to complete the question. In fact the code above does not work. It says the message in the MsgBox.

Thanks!!