iCAD×VBでコスト可視化ツール

起動したら開いているiCAD図面（or 特定のユニット）に設定されているコスト情報を読み取って、
一覧＆合計金額をパッと表示するアプリを作りたい。
とにかく手軽に、起動するだけで表示されるようにしたい。

ゆーさんより、部品表作成システム"のコンソール版を使用すればできるのでは？と提案いただいた。
早速マニュアルを確認してみると、これは使えそう。

ファイルパスとフォルダパスはこれでいけそう

If iCADObj.ActiveDrawing.Path = "" Then
    MsgBox("未保存の図面です。保存してから再度実行してください。")
    Return False
End If
    fileName = iCADObj.ActiveDrawing.FileName
    folderPath = iCADObj.ActiveDrawing.Path
    Return True

とりあえずアプリはできた...が、iCADから起動が出来ない。
アイコンコマンドにしてみたりアプリ実行コマンドにしてみたりしたが、
何故かiCADから実行したときのみエラーが出る...