Inventor / iLogic : 作業オブジェクトを非表示にする

アセンブリモデルを開いてみたら、「作業オブジェクトが全部表示されていて、形状が隠れてしまっていた。」という経験はありませんか？
コンポーネントを一つずつ修正するのが大変なので、まとめて非表示にするに iLogic ルールを作ってみました。

全てのコンポーネントオカレンスを再帰的にたどって、作業オブジェクトを非表示にするというやり方です。処理時間も遅くありません。

非表示されない箇所が残る場合があったりして、完璧とは言えませんがそこそこ実用的なものが出来たと思います。

※　2023/05/13 追記
DLL化したiLogic ルールはこちら

AddReference "YO_InvTool_for_iLogic.dll" 
' アセンブリ上の全ての作業オブジェクトを非表示にする

Sub main
	Dim oClass As New YO_InvTool_for_iLogic.HideWorkObjects
	oClass.InvApp = ThisApplication
	oClass.Help
	oClass.Start_HideWorkObjects
	MessageBox.Show("Done", "アセンブリ上の全ての作業オブジェクトを非表示にする")
End Sub

iLogicだけのルールはこちら
適切でない引用を避けるため有料化しました。