ExcelからAutoCADへの連携ができない
ExcelのVBAでAutoCADの操作をしようと勉強中なのですが
参考資料を真似て
--------------------------------------------------------
Function acad_int()
On Error Resume Next
Set AcadApp = GetObject(, "AutoCAD.Application")
(上の行でERR'429'Activexコンポーネントはオブジェクトを作成できません。のエラー)
If Err Then
Set AcadApp = CreateObject("AutoCAD.Application")
AcadApp.Visible = True
End If
AcadApp.Visible = True
End Function
-----------------------------------------------------------
コピーしてExcelで実行すると、GetObjectで上記( )内のエラ-メッセージがでます。
参照でAutoCAD 2004 タイプライブラリ にはチェック入れています。
また、AutoCADを起動していても、していなくても同じみたいです。
使用しているのは ・AutoCAD LT2004
・オフィス2003Excel
ですが、何せ初心者で始めたばかりでここから進む事ができません。
どうかお力をお貸しください。
お礼
回答ありがとうございました。しかし、まだ以前のままで動きません。回答のアドレスでの不具合表示と当方の不具合表示が違っていましたが。それともダウンロ-ド,解凍にミスがあったのでしょうか。
補足
「ac1st15dll.ZIP」をダウンロ-ドすると、名前を付けて保存の欄に移りファイル名が「ac1st15dll]となり「.zip」の文字ありませんが保存してよいのでしょうか。(▼をクリックするとファイル名の下には色々なファイルがあり、「ac1st15dll.zip」も存在します。)その後に解凍するのですか?。順序が解らず回答お願いします。