63.引出線矢印変更 | AutoCADマクロ屋本舗
[63]
引出線矢印変更
*^C^C$M=setenv;to;0;$(nth,$(getenv,to),select;$M="""$(if,$(getvar,cmdactive),\,)"""setenv;le;0;;to;1,;dimblk;$(nth,$(getenv,le),_dot,_none,_open,.,_datumfilled);;to;2,,,,)$(nth,$(getenv,to),,,dimoverride;dimsah;on;dimasz;$(nth,$(getenv,le),1,1,3,3,3);dimldrblk;$(getenv,dimblk);;p;;setenv;to;3,,,)$(nth,$(getenv,to),,,,offset;;^Xオブジェクトを選択:[$(nth,$(getenv,le),なし,開矢印,塗潰し,テータム,黒丸)(R-Click)]^X\$M="""$(if,$(getvar,cmdactive),;setenv;to;4,setenv;to;5)""",,)$(nth,$(getenv,to),,,,,select;@;\setenv;to;1,;le;$(if,$(eq,$(getenv,le),4),0,$(+,$(getenv,le),1));;to;1)^M


LT2000/LT2004 R2005/R2006 動作確認済

●使い方
1.オブジェクトを選択
2.引出線矢印を黒丸に変更後オブジェクト選択、又は右クリック

 ※右クリックを押すごとに
  矢印なし→開矢印→塗潰し→テータム→黒丸


▲注意
1.マクロが長い為、メニューファイルに直接コピペして下さい
2.引出線以外は選択しないで下さい

■コメント
このマクロ1つで、引出線の矢印を
4種類変更可!!


世界一やさしい 超入門 DVDビデオでマスターする AutoCAD LT 2009/2008/.../鈴木 孝子

¥3,129
Amazon.co.jp