77.指定画層表示 | AutoCADマクロ屋本舗
[77]
指定画層表示[元に戻す(右クリック)] [2006.10.16修正]
*^C^C$M=setenv;to;0;$(nth,$(getenv,to),;la;$(getvar,clayer);undo;be;offset;;^X表示画層を選択:^X\;select;non;@;non;@;;setenv;to;1,,,,)$(nth,$(getenv,to),,_ai_molc;@;-layer;of;*;y;on;$M="""$(getvar,clayer)""";;setenv;to;2,$(if,$(eq,$(getvar,clayer),$(getenv,la)),,-layer;s;$(getenv,la);of;$(getenv,la);y;;)setenv;to;3,,)$(nth,$(getenv,to),,,,;la;$(getvar,clayer);offset;;^X表示画層を選択:[元に戻す(R)]^X\$M="""$(if,$(getvar,cmdactive),;setenv;to;3;select;non;@;non;@;;undo;be;setenv;to;1,undo;e;u;setenv;to;3,)""")^M


LT2000/LT2004 動作確認済

●使い方
1.オブジェクト選択
  選択したオブジェクトの画層のみ表示
  右クリックで元に戻します

▲注意
修正後、特に無し!!

■コメント
ミスピック対応していなかったので
若干修正しました。
ついでに、マクロの長さも短くしました。


AutoCAD LT 2012ベーシックマスター/杢野 順子

¥2,940
Amazon.co.jp



↓↓↓前バージョン↓↓↓

指定画層表示[元に戻す(右クリック)]
*^C^C$M=setenv;to;0;$(nth,$(getenv,to),setenv;la;$(getvar,clayer);lengthen;^X表示する画層を選択:^X\;$M="""$(if,$(getvar,cmdactive),;setenv;to;0,setenv;to;1)""",,,,)$(nth,$(getenv,to),,_ai_molc;@;-layer;of;*;y;on;$M="""$(getvar,clayer)""";;setenv;to;2,$(if,$(eq,$(getvar,clayer),$(getenv,la)),,-layer;s;$(getenv,la);of;$(getenv,la);y;;)setenv;to;4,,)$(nth,$(getenv,to),,,,undo;4;setenv;to;0,setenv;la;$(getvar,clayer);lengthen;^X表示する画層を選択:[元に戻す(右クリック)]^X\;$M="""$(if,$(getvar,cmdactive),;setenv;to;3,setenv;to;1)""")^M


LT2000 動作確認済

●使い方
1.オブジェクト選択
  選択したオブジェクトの画層のみ表示
  右クリックで元に戻します

▲注意
特に無し!!

■コメント
自分は画層操作しないので、紹介すること無かったが
依頼が有り作ったマクロです。


AutoCAD LT 2012ベーシックマスター/杢野 順子

¥2,940
Amazon.co.jp