（３）モデルの大きさの変更その２　および　使用感まとめ
 
　今度はモデルの直径が、
　　１００→５００
になり、見た目が大きく変
わりました。
　最後にファイルをＩＧＥＳ
形式で保存するため、
エクスポートを押します。
ここではデモしてません。

　下の１行でＩＧＥＳファイルにエクスポートできます。
出力ファイル名はここではa.igsとしてますが、省略可です。
付属している関数のＨｅｌｐのサンプルは間違ってますね。
（引数のIGESを""で囲っていた。）

Private Sub CommandButton3_Click()
rg = rgw.ModelExportFile(IGES, "a.igs", "cupholder.prt")
End Sub

 　
以上如何だったでしょうか？
ＶＢＡを扱える人なら数行でPro/EのモデルをＥＸＣＥＬから制御できるでしょう。
結構機能的にはお薦めですね。
ただし、言っておきますが、コストパフォーマンスは良くないです。
なんせソフト代だけで７０万円、ランタイムも１ライセンスにつき２０万円もかかります。
余程、使いこなそうと考えないとＰａｙしないでしょう。
私は無料の期間限定版で遊ばせて貰うのみになるでしょう。

Ｐ．Ｓ．　Pro/E→IGESファイル変換
　上記のＶＢＡを見ればお分かりのように、Pro/EのファイルをＩＧＥＳに大量に自動で
変換できるような気がしてたのですが、Ｈｅｌｐを見ても読み込んだファイルをメモリから
削除するコマンドがありません。(Pro/TOOLKITでいうPro/MdlDeleteコマンド)
Ｈｅｌｐのミスかもしれませんが、本当にないならどんどん読み込んでいくとメモリに溜ま
ってしまい、大変なことになりそうです。なんで作ってないのかなー？他に逃げがある？

TOPへ戻る