この掲示板は AutoCADマクロ屋本舗 の掲示板です。

【 注意 】最初に必ず ↓↓ 下記内容 ↓↓ を参照ください。
① マクロが分からない方は、まず 【 マクロ講座 】 を参照ください。
② 質問の前に 【 マクロ使用前の注意事項 】 をお読みください。
③ 質問する時は、新規投稿フォーム下の【 新規投稿時のお願い 】を必ずお読みください。

マクロ作成のお願い
1. AutoCADのバージョン → AutoCAD LT 2015

2. マクロ作成お願いします。
 
  <作成依頼内容>
  画層・色・高さ・文字スタイルなどを決めて作った文字を自由な位置に複写して置きながら、
  その文字が「カウントアップ」していく。

  ※マクロ集の「カウントアップ文字編集(文字有無選択)」を使用させて頂いており、
   マクロのすごさに「もっと出来るのでは…」と欲を出しましたが、自分では何ともできません。
   文字を置いて(複写)してから、「カウントアップ文字編集(文字有無選択)」を使用していますが、    
   文字を置く(複写)と同時に、「カウントアップ文字編集(文字有無選択)」の様な事が出来れば
   助かります。  
   ご検討よろしくお願い致します。 
  • ひらめ
  • 2018/02/23 (Fri) 10:49:15
Re: マクロ作成のお願い
ちょっとバタバタしてるので
来週になります。
しばらくお待ちください。
  • とってぃ
  • 2018/02/23 (Fri) 13:17:03
Re: マクロ作成のお願い
複写ではなく文字記入ですが
(画層・色・高さ・文字スタイル設定済み前提です)

*^C^C$M=setenv;to;0;$(nth,$(getenv,to),;c0;初期値;ray;^X文字付加[無(L)/付(R)]^X\$M="""$(if,$(getvar,cmdactive),;setenv;tt;0;;to;2,setenv;tt;1;;to;1)""",,,,,)$(nth,$(getenv,to),,ray;^X文字付加[前方(L)/後方(R)]^X\$M="""$(if,$(getvar,cmdactive),;setenv;iti;0,setenv;iti;1)""";;TEXT;\;to;2,,,,)$(nth,$(getenv,to),,,;c1;$(getenv,c0)^x\;Count;\;cu;$M="""$(getenv,c1)""";;to;3,,,)$(nth,$(getenv,to),,,,;text2;$(if,$(getenv,iti),$(getenv,cu)$(getenv,TEXT),$(getenv,TEXT)$(getenv,cu));setenv;to;4,,)$(nth,$(getenv,to),,,,,ray;文字列の始点を指定:^X\$M="""$(if,$(getvar,cmdactive),;-text;@;;;$M="""""""""$(if,$(getenv,tt),$(getenv,text2),$(getenv,cu))""""""""";setenv;to;5,setenv;to;0)""",)$(nth,$(getenv,to),,,,,,;cu;$(+,$(getenv,cu),$(getenv,Count));;to;3)^M

複写ではないので、もともと有る文字を利用はできません。
  • chibi-tom
  • 2018/02/23 (Fri) 17:06:57
Re: マクロ作成のお願い
chibi-tom 様

早々に作成くださり、ありがとうございます!
もっと時間が掛かるものだと思っていたので、ビックリです☆

早速、使用させて頂きましたが、非常に快適です。
複写でなくても、ダイナミック文字入力で出来るんですね!
ありがとうございます。

また、お願いするかと思いますので、よろしくお願い致します。
本当にありがとうございました☆
  • ひらめ
  • 2018/02/26 (Mon) 14:08:42
Re: マクロ作成のお願い
とってぃ 様

お忙しい所、早々にコメント頂いており、ありがとうございます。
今回は、chibi-tom 様 が載せてくださっていたマクロで、快適に作業出来そうです。

また、お願いするかと思いますので、よろしくお願い致します。
ありがとうございました。
  • ひらめ
  • 2018/02/26 (Mon) 14:13:02
Re: マクロ作成のお願い
わざわざコメントありがとうございます
今回chibi-tomさんが作ってくれてましたので
お任せしてましたw

chibi-tomさんに感謝です
  • とってぃ
  • 2018/02/26 (Mon) 21:26:20

返信フォーム






プレビュー (投稿前に内容を確認)