アクティブ図面の場所をエクスプローラーで開くコマンド作りました。【ターミヤ】

お疲れ様です。ターミヤです。

AutoCADで開いている図面の場所をエクスプローラーで一発表示したいと思った事はありませんか？
私は通常エクスプローラーからDWGをダブルクリックして図面を開きます。
何かの拍子にエクスプローラーを閉じたりした時にまた同じ階層を辿って行くのが面倒くさくて面倒くさくて。
なのでコマンドを作りました。



VB.NETでたった3行で出来てます。

            Dim Doc As Document = Application.DocumentManager.MdiActiveDocument

            Dim Path As String = System.IO.Path.GetDirectoryName(Doc.Name)

            If Path <> "" Then System.Diagnostics.Process.Start(Path)

エクスプローラーの階層を辿る時間さえ惜しんで仕事する協進エンジニアリング。
そんな協進エンジニアリングをよろしくお願い致します。

ではまた♪