AutoCADマクロ屋本舗 掲示板

バージョン
　2017LT

質問内容
　マイクロソフトのWORDにAUTOCADの図面をビューコピー→メタファイルで貼付けをする作業について質問です。
　ビューコピーはAUTOCADのウィンドウサイズに依存しますので、いつも図面の位置や大きさを揃えるのに苦労しています。
　そこでビューコピーを選択範囲に限定する方法が知りたいです。
　コマンドマクロで解決できるでしょうか？
　なお、貼付けはメタファイルが原則です。
　
　その他、良い解決方法があればご教示お願い致します。

　以上、何卒宜しくお願い致します。

こんにちは。

私のやってる方法を書いてみます。
CADからExcel（等のOffice）へのメタファイル貼付けは癖があり、
CADのバージョンが違えば挙動が変わり、
Officeのバージョンが違っても挙動が変わります。
従って、下記の方法がそのまま通用しない事もあります。

いつも同じ大きさでコピーするには、条件として
①パソコンの解像度がいつも同じ。
②モニタの大きさがいつも同じ。
つまり、いつも同じパソコンでやりなさい。って事です。

③オブジェクトをコピーするときに、画面上での縮尺が常に同じ。
　あるオブジェクトをコピーする際、例えば1000mmの線が画面上で定規を当てて測ったら8cmで表示されていたとします。
　次に別のオブジェクトをコピーする際、同様に1000mmの線が画面上で8cmに表示されるように調整してコピーする。
　（1000mmの物が無ければ500mmの物を4cmに表示されるように調整。つまり表示尺度を合わせる。）

これで、Excelで貼り付けた際の大きさは同じになると思います。

あと、余白を最小限にしたい場合は、③で調整した表示倍率を変える事無くCADのウインドウの大きさを変えて、
表示範囲を狭めていき、コピーしたいオブジェクトがウインドウ枠いっぱいになった時にコピーすれば良いです。

マクロで省力化できるとすれば、画面表示倍率を設定する時くらいでしょうか。

あと、ビューコピー＆貼付けではなく、
CADのWMFOUTコマンドで、一度メタファイルデータを作成して、そのファイルをOfficeで挿入する方法もあります。
一手間増えますが、コピペよりも融通が利く事もあります。

Lonさん
さっそくのお返事ありがとうございます。
コマンドマクロで窓選択のように、選択した窓を画面サイズとしてこの範囲でビューコピーするという機能が作れれば嬉しいのですが・・・
無理そうですね。
アドインで作るしかなさそうな気がしてきました。
メタファイル化も検討したのですが、ビューコピーと同様に画面の表示状態に依存しますので解決策にはならなかったです。

ご助力頂きありがとうございました。

引き続き解決策があればご教示頂ければ幸いです。