パーツに上書きされた色をリセットする方法

こんにちは、

Soutionday2007 の会場でこんな事をお聞きしました。

各社の電子カタログをWEBからダウンロードして使っている。そのとき、色が付いてくるのは良いのだが、逆に色をとりたいときに困る場合がある。

これは、パーツに色スタイルが設定されているのでなく、それぞれの面に色が上書きされているためです。Inventorの操作としては、それぞれの面のプロパティ編集で修正します。それでは効率が悪いので、面に上書きされた色をリセットするマクロを作ってみました。

マクロは、こちらからダウンロードください。　FACECOLOR.ZIPをダウンロード　

マクロのインストール方法などについては、 こちら のページにある 「Inventorマクロ登録手順」 を参照ください。

面に色の付いたパーツをアクティブにして、このマクロを実行すると、面に上書きされた色がリセットされてパーツで設定した色スタイルで表示されるようになります。

どうぞご利用ください。

-YO

Comments

[投稿情報: やまら]

いつもお世話になります。
igesのデータを変換すると、コンポジットというフューチャーになって、マクロが期待通りに動かないようです。
最後の方のfor ... nextのループ3行を、以下のように変更すると良いです。

With oDoc.ComponentDefinition
If .SurfaceBodies.Count <> 0 Then
For Each oFace In .SurfaceBodies(1).Faces
oFace.SetRenderStyle kPartRenderStyle
Next
ElseIf .Features.Count <> 0 Then
For Each oFace In .Features(1).Faces
oFace.SetRenderStyle kFeatureRenderStyle
Next
End If
End With