|
Excel 2007 で CopyPictureをマクロで実行すると非常に粗い図になってしまいます。どなたか対応方法をご伝授下さい。
例えば、Range("A1:E10")にオートシェイプなどがあり、このRangeをSelectして、
Selction.copyPicture Appearance:=xlScreen, Format:=xlBitmap
を実行します。(Formt:=xlPicture だとマクロでなくても図が荒れます)
次に、Range("A15")を選択して、
ActiveSheet.Paste
を実行します。以上をマニュアルで「図としてコピー」→「貼り付け」で行ってみると図は粗くなりません。ところが、マクロにして実行すると図が非常に粗くなってしまいます。CopyPicture を実行した時点でブレークしてクリップボードを見てみると、すでに図が粗くなっています。マニュアルで「図としてコピー」の後では問題はありません。
Excel 2003 ではまったく問題がなかったのですが、2007ではクリップボード内でのフォーマットもビットマップを指定しているにもかかわらず、通常のビットマップとは違うようです。
形式を選択して貼り付け、図として貼り付け等いろいろ試してみましたが、コピーした時点で図が荒れているため、行き詰まりました。
マニュアルで問題がないということは、何らかの方法があると思うのですが、どなたか知恵をお貸し下さい。
|
|