イッツキャドコミュニティ

>「文書番号 : S3-0004」で試したら次のエラーが出て上手く作動しないのです。
>ACtivXコンポーネントはオブジェクトを作成できませんと出ます

はじめまして「naka様」

「naka様」ご提示のコードでは、オブジェクトの代入が

　　Drawing = CreateObject("ItsSuperCAD.Draw")

　　※　Drawing　→　myDraw　の誤りでは？

になっていますがIt'sCADの場合は、

　　Set myDraw = New ITsCAD.Drawing

になります。


「おいも様」ご提示のサンプルコードですが私の環境では

　　ACtivXコンポーネントはオブジェクトを作成できません

とのエラーはでません。
　当方の環境

　　MAX3 Ver12.6.30.178
　　Excel 2019 Ver2302
　　Windows10 Pro


購入に際しての確認ということは、無料版のIt'sCADで試しているのでしょうか。
そうだとしたら参照しているライブラリの違いでエラーが出ているのかも知れません。


因みにIt'sCADのオートメーションは進展がないようなので私は使用していません。

理由は、

　　1　VBAコードの実行後にIt'sCADが終了する。
　　　 もしくはIt'sCADのファイルが終了する。
　　　 上記の動作は不可避である。
　　　 以前は、MicrosoftのVisual StudioのMicrosoft Visual Basic .NETしか
　　　 強制終了を回避できなかった。

　　2　上記「1」の動作は環境に依存し、必ずしも他の環境で再現するとは限らない。

　　3　文字や寸法を作図するメソッドがない。

　　4　既存の図形を編集する術がない。

などです。