Autodesk Community Tips- ADNオープン
Autodesk Community Tipsではちょっとしたコツ、やり方、ショートカット、アドバイスやヒントを共有しています。

InventorのVBA環境で、ライブラリの参照設定を自動で設定する方法はありますか?

質問

InventorのVBA環境で、VBAの「ツール」-「参照設定」から利用するライブラリの参照設定が行えます。

VBAを実行するクライアント端末が複数あり、各端末でライラリファイルの参照設定をすることが手間なので、ライブラリの参照設定を出力して配布することは可能でしょうか?

回答

Inventorの設定ファイルには、VBAでの参照設定を編集する機能はありません。また、InventorのAPI にも直接的に参照設定を編集する機能はありません。

 

一方で、InventorのAPIで、Microsoft社が提供するVBA開発環境のVBProjectオブジェクトを取得するAPIが公開されているため、VBProjectオブジェクトのReferences.AddFromFile()メソッド等を利用することで、プログラムコードから参照設定を行うことが可能です。

 

以下は、"Adbe Acrobat 10 Type Library”への参照を追加する場合のサンプルコードとなります。

Dim app As Application
Set app = ThisApplication

Dim VBProject As Object
Set VBProject = app.VBAProjects.Item(1).VBProject

Const RefFile As String = "<path to acrobat.tlb file>"
VBProject.References.AddFromFile RefFile