AutoCADマクロ屋本舗 掲示板

お世話になります。AUTOCAD2016レギュラーを使ってます。

Ｒ2012からＲ2016に環境が変わったのですがポリライン一括結合のマクロが動かず
不便を感じている状況です。何かの設定が間違っている等ご教示いただきたく掲示板に
書き込みさせていただく次第です。

下記の貼付けた内容を見ると、PASTEBLOCKの後の"NON"がはじかれているようです。
マクロではなくコマンドラインで打ち込む分には大丈夫です。
知識がなく何がいけないのか検討もつきません。PICKADDは"1"になってます。
どなたかご教示ください。宜しくお願いいたします。


コマンド: select

オブジェクトを選択: もう一方のコーナーを指定: 認識された数: 4

オブジェクトを選択:

コマンド: copybase

基点を指定: non
0<0

オブジェクトを選択: p
認識された数: 4

オブジェクトを選択:

コマンド: erase

オブジェクトを選択: p
認識された数: 4

オブジェクトを選択:

コマンド: undo
現在の設定: 自動 = オン, コントロール = すべて, 合成 = はい, 画層 = はい
取り消す操作の数を入力 または [自動(A)/コントロール(C)/開始(BE)/終了(E)/マーク(M)/後退(B)] <1>: be

コマンド: pasteblock

コマンド: non
そのようなコマンド "NON" はありません。ヘルプを表示するには F1 キーを押してください。

コマンド: 0<0
そのようなコマンド "0<0" はありません。ヘルプを表示するには F1 キーを押してください。

コマンド: explode

オブジェクトを選択: l

オブジェクトは分解できません。

何も見つかりません。
オブジェクトを選択: select


*選択無効*
点を指定 または 最後(L)/すべて(ALL)/グループ(G)

"NON"がはじかれているのではなく、
何かの原因により、pasteblockコマンドが途中で終了している様です。

　　例えばクリップボードが空の時（又はAutocadオブジェクトではない物が入っている時）は、
　　pasteblockコマンドが途中で終了します。

そのマクロを実行した後（エラーで止まった後）手動で貼り付けを行ったら、
選択した物が貼り付けられますでしょうか？


原因の特定は難しいかもしれませんので、とりあえず、シンプルなマクロを作ってみました。
間に合わせに使ってみて下さい。

^C^Cselect;$M=$(if,$(getvar,cmdactive),\,)peditaccept;1;pedit;m;p;;j;;^M

貼り付けたマクロの
pasteblockの後ろに、余計な改行や空白スペースか
もしくは余計な ^M が無いか確認願います。

2016での動作報告もありますので。

LON様

初めまして。早速の書き込みありがとうございます。

アドバイスいただいた手動貼付け（コマンドラインでの打ち込み）では
ブロック図形で貼付けできました。

また、マクロの作成ありがとうございます。早速使わせていただきました。
私にとっては間に合わせではなく大変ありがたいマクロです。

勉強不足での書き込みに対応いただきありがとうございました。
今後とも宜しくお願いいたします。

とってぃ様

初めまして。ご返信ありがとうございます。
ご指摘いただいた、空白、改行等は問題ありませんでした。
コピペの繰り返しを何回もやりましたがダメでした。

お伝えできる情報が少なすぎるためあきらめムードです。
今後ともよろしくお願いいたします。