シートコピーとかするとグラフとデータをまるっとコピーできるが、そういうわけにもいかないときもある。
例えば、グラフのデータが別シートにあるとき。
これは困ったものだ、どうしたものか・・・と悩んでいたら、
「図でコピーして図で保存しておけばよいではないか！」
と思い立った。
これなら、グラフの元データの場所を考える必要ないし、ピクチャ形式で保存しておけば、容量もさほどとらないのではと思い、早速マクロを組んでみる。
CopyPictureというプロシージャ（関数）を利用するのだが、貼り付け関数は、シート関数にしかないので、貼り付けたいセルをSelectしてから、シート関数で貼り付けるという、少々バカバカしいというか、わざわざSelectする手間がいるところが嫌なところだ。
とりあえず、組んで走らせてみると、想定通りグラフは図形として貼りついて、オホホホホーーーとか思っていたら、動作検証をしてくださっているお客様から、
「うまくいかないんですよね～」とメールがやってきた。
やってみると、本当にうまくいってない。
グラフのプロットエリアがどんどんずれていって、プロットエリアが小粒になってしまっておる。
なぜじゃ！ナゼにじゃ!!
私が触ってた時はうまくいってたのに・・・と思って色々試すと、うまくいくときといかないときがある。
こういうのが一番困るんだよ。
と思いながら眺めていたら、どうやらシートの表示（ズーム）に影響しているのだと分かった。
解像度とかの絡みなのだろうか。
とりあえず、コピー元シートをアクティブにして、
ActiveWindow.zoom = 100
とした後で、貼り付け先シートに貼り付けてやると、プロットエリアがずれないで貼りつくようになった。
おそらく、コピー元と貼り付け先のズームを同じにしてやらないと、綺麗には貼りついてくれないのだろう。
やれやれ、まったく困ったものだ。