AutoCADマクロ屋本舗 掲示板

お世話になります。
先日はブロック回転マクロを作成して頂きありがとうございました。
また一つ作成して頂きたいマクロがあります。

現在、寸法記入時に寸法線内に収まらない場合は寸法値と寸法線を一緒に移動としています。
直列寸法で寸法をとる時に寸法線内に収まらない寸法が隣あうと自動で寸法線を移動、引出線を追加となり、個別でオブジェクトプロパティ管理から寸法線を一緒に移動、引出線を追加、引出線なしから選んで調整をかけています。
この動作をオブジェクトプロパティ管理を開かずに、寸法オブジェクトを選択し、右クリックで上記3種類の寸法値の移動方法を選んで、実行するようなマクロは作成可能でしょうか？
使用バージョンは2016レギュラー版で、TDマクロス導入済みです。

ご確認宜しくお願い致します。
長々とすみません。

標準機能で有りますよ。

寸法線を選択状態で、右クリックするとショートカットメニューが表示され、
「寸法値位置」をクリックすると上記３種類が表示されます。

但し、オプション設定で、右クリックでショートカットメニューが出てこない設定にしている場合は、
この方法は使えません。

:::::::::::::5/31 10:20 追記::::::::::::::
右クリックでショートカットが出現するのは、
2014以前のバージョンでクラシックモードにしている時みたいです。

2015以降で、右クリックのメニューに表示させたい時は、
下の方でLUNEさんが書いている方法通りに、追加すれば良いです。

Lonさま

早々のご回答ありがとうございます。
2016レギュラー版を使用しているのですが、教えて頂いたコマンドが見あたりませんでした。。。。（少し設定を触っているので色々と探してはみました）

作ってみました。
お試しください。


♪寸法値移動マクロ
*^C^C$M=setenv;to;0;$(nth,$(getenv,to),;atm;0;;to;1,;to;0;offset;;^x^x寸法値選択【$(nth,$(getenv,atm),寸法線と,引出線と,文字のみ)移動】-切替(Rc)-^x\$M="""$(if,$(getvar,cmdactive),;select;non;@;non;@;;setenv;to;2,setenv;atm;$(nth,$(getenv,atm),1,2,0);;to;1)""",)$(nth,$(getenv,to),,,copy;p;;non;@;non;@;erase;p;;aidimtextmove;$(getenv,atm);l;;\setenv;to;1)^M

コマンド登録はあると思うので、カスタマイズで寸法のショートカットメニューに入れれば、右クリックメニューで使えます。

画像を添付し忘れました。

寸法を選択し
寸法値のグリップにマウス合せるだけで出ませんか？

あとオプションの
ダイナミックグリップメニューを表示をチェック

とっていさま
マクロ作成頂きありがとうございました。
他の方法まで教えて下さり感謝です。
LUNEさまもありがとうございました。

autocadに移行したばかりですのでまだまだ勉強が必要ですね。。。
ありがとうございました。