[130]
寸法値修正(切上･切下･元寸法)　[2008対応]　[2009/4/14 修正]

*^C^C$m=setenv;to;0;$(nth,$(getenv,to),;kt;切上単位記入("10/5/1/0.1"等)^X\;sw;0;;to;2,;l1;$(nth,$(getenv,sw),$(*,$(+,$(fix,$(/,$(getvar,perimeter),$(getenv,kt))),1),$(getenv,kt)),$(*,$(fix,$(/,$(getvar,perimeter),$(getenv,kt))),$(getenv,kt)),);;to;5,,,,)$(nth,$(getenv,to),,,offset;;^X^X寸法線(寸法値下)選択：【$(nth,$(getenv,sw),切上,切下,元寸法)】--変更(Rc)--^X\$M="""$(if,$(getvar,cmdactive),;setenv;to;4,setenv;to;3)""",;sw;$(if,$(=,$(+,$(getenv,sw),1),3),0,$(+,$(getenv,sw),1));;to;2,,)$(nth,$(getenv,to),,,,,;to;2;select;non;@;non;@;;copy;p;;non;@;non;@;erase;p;;undo;be;dimoverride;dimblk;_none;;l;;explode;l;lengthen;nea;@;;undo;e;u;setenv;to;1,)$(nth,$(getenv,to),,,,,,cmddia;0;dim1;newtext;$(nth,$(getenv,sw),$(getenv,l1),$(getenv,l1),<>);l;;cmddia;1;dimoverride;dimclrt;$(nth,$(getenv,sw),1,1,);;l;;setenv;to;2)^M

※数値を固定したい場合は、マクロ中「切上単位記入("10/5/1/0.1"等)^X\」の
　「\」の部分を数値に変えて下さい。
　例：切上単位記入("10/5/1/0.1"等)^X10

LT2004 R2005/R2006/R2008 動作確認済

●使い方
１．切上単位記入("10/5/1/0.1"等)
例：実際の寸法値"123.456"

"0.1"と記入すると、１の位が、切上"123.5"/切下"123.4"となります。
"1"と記入すると、１の位が、切上"124"/切下"123"となります。
"5"と記入すると、１の位が、切上"125"/切下"120"となります。
"10"と記入すると、１の位が、切上"130"/切下"120"となります。

２．寸法線(寸法値下)を選択
　この時、右クリックで「切上/切下/元寸法」切替可能。

　※通常の寸法値下の寸法線を指定。（引出線記入されている場合も同じ）

　※尚、修正された寸法値は、赤色で表示されます。

【切上寸法時】

【切下寸法時】

▲注意
１．寸法線(寸法値下)以外を選択しないで下さい。
　　尚、修正された寸法値は、書き換えただけの文字です。
２．切上単位に、２～４や６～９等の、切上･切下し辛い値を入れないで下さい。
　　寸法が切上単位通りにならない場合があります。
３．マクロが長い為、カスタマイズダイアログに直接貼付け出来ない場合は
　　メニューファイルに直接貼り付けて下さい。

■コメント
当ＨＰの掲示板に、2008への対応依頼があったので作りました。
注意事項を読んでお使い下さい。

AutoCAD 2013 3D機能公式トレーニングガイド (Autodesk officia.../日経BP社

￥3,675
Amazon.co.jp

↓↓↓　旧バージョン　↓↓↓

寸法値修正(切上･切下･元寸法)　[切上･切下値指定ﾊﾞｰｼﾞｮﾝ]　[2008/2/22 修正]

*^C^C$m=setenv;to;0;$(nth,$(getenv,to),;kt;切上単位記入("10/5/1/0.1"等)^X\;sw;0;;to;2,;l1;$(nth,$(getenv,sw),$(*,$(+,$(fix,$(/,$(getvar,perimeter),$(getenv,kt))),1),$(getenv,kt)),$(*,$(fix,$(/,$(getvar,perimeter),$(getenv,kt))),$(getenv,kt)),);;to;5,,,,)$(nth,$(getenv,to),,,offset;;^X^X寸法線(寸法値下)選択：【$(nth,$(getenv,sw),切上,切下,元寸法)】--変更(Rc)--^X\$M="""$(if,$(getvar,cmdactive),;setenv;to;4,setenv;to;3)""",;sw;$(if,$(=,$(+,$(getenv,sw),1),3),0,$(+,$(getenv,sw),1));;to;2,,)$(nth,$(getenv,to),,,,,;to;4;select;non;@;non;@;;copy;p;;non;@;non;@;erase;p;;undo;be;dimoverride;dimblk;_none;;non;@;;explode;non;@;;non;@;;$M="""$(if,$(getvar,cmdactive),;undo;e;u;setenv;to;2,lengthen;non;@;;undo;e;u;setenv;to;1)""",)$(nth,$(getenv,to),,,,,,cmddia;0;dim1;newtext;$(nth,$(getenv,sw),$(getenv,l1),$(getenv,l1),<>);l;;cmddia;1;dimoverride;dimclrt;$(nth,$(getenv,sw),1,1,);;l;;setenv;to;2)^M

※数値を固定したい場合は、マクロ中「切上単位記入("10/5/1/0.1"等)^X\」の
　「\」の部分を数値に変えて下さい。
　例：切上単位記入("10/5/1/0.1"等)^X10

LT2004 R2005/R2006 動作確認済

●使い方
１．切上単位記入("10/5/1/0.1"等)
例：実際の寸法値"123.456"

２．寸法線(寸法値下)を選択
　この時、右クリックで「切上/切下/元寸法」切替可能。

　※通常の寸法値下の寸法線を指定。（引出線記入されている場合も同じ）

　※尚、修正された寸法値は、赤色で表示されます。

【切上寸法時】

【切下寸法時】

▲注意
１．寸法線(寸法値下)以外を選択しないで下さい。
　　尚、修正された寸法値は、書き換えただけの文字です。
２．切上単位に、２～４や６～９等の、切上･切下し辛い値を入れないで下さい。
　　寸法が切上単位通りにならない場合があります。
３．マクロが長い為、カスタマイズダイアログに直接貼付け出来ない場合は
　　メニューファイルに直接貼り付けて下さい。

■コメント
切上･下値を記入できる様に修正しました。
注意事項を読んでお使い下さい。

AutoCAD 2013 3D機能公式トレーニングガイド (Autodesk officia.../日経BP社

￥3,675
Amazon.co.jp

↓↓↓　旧バージョン　↓↓↓

寸法値修正(切上･切下･元寸法) [切上単位固定：小数点以下]　[2007/12/25 UP]

*^C^C$m=setenv;to;0;$(nth,$(getenv,to),;sw;0;;to;2,;l1;$(fix,$(getvar,perimeter));;to;5,,,,)$(nth,$(getenv,to),,,offset;;^x^x寸法線(寸法値下)選択：【$(nth,$(getenv,sw),切上,切下,元寸法)】--変更(Rc)--^x\$M="""$(if,$(getvar,cmdactive),;setenv;to;4,setenv;to;3)""",;sw;$(if,$(=,$(+,$(getenv,sw),1),3),0,$(+,$(getenv,sw),1));;to;2,,)$(nth,$(getenv,to),,,,,;to;4;select;non;@;non;@;;copy;p;;non;@;non;@;erase;p;;undo;be;dimoverride;dimblk;_none;;non;@;;explode;non;@;;non;@;;$M="""$(if,$(getvar,cmdactive),;undo;e;u;setenv;to;2,lengthen;non;@;;undo;e;u;setenv;to;1)""",)$(nth,$(getenv,to),,,,,,cmddia;0;dim1;newtext;$(nth,$(getenv,sw),$(+,$(getenv,l1),1),$(getenv,l1),<>);l;;cmddia;1;dimoverride;dimclrt;$(nth,$(getenv,sw),1,1,);;l;;setenv;to;2)^M

LT2004 R2005/R2006 動作確認済

●使い方
１．寸法線(寸法値下)を選択
　この時、右クリックで「切上/切下/元寸法」切替可能。

　※通常の寸法値下の寸法線を指定。（引出線記入されている場合も同じ）

　※尚、修正された寸法値は、赤色で表示されます。

【切上寸法時】

【切下寸法時】

▲注意
１．寸法線(寸法値下)以外を選択しないで下さい。
　　尚、修正された寸法値は、書き換えただけの文字です。
２．マクロが長い為、カスタマイズダイアログに直接貼付け出来ない場合は
　　メニューファイルに直接貼り付けて下さい。

■コメント
当ＨＰの掲示板に、作成依頼があったので作りました。
注意事項を読んでお使い下さい。

AutoCAD 2013 3D機能公式トレーニングガイド (Autodesk officia.../日経BP社

￥3,675
Amazon.co.jp

130.寸法値修正(切上･切下･元寸法)