|
|
| Excel VBA Macro ・ その他 ・ FAQ |
|
埋め込みグラフをBMP形式で保存するには？
|
|
|
|
Question 5307 |
拙著「Excel VBA そのまま使える実用マクロ 500連発」 |
 |
 |
|
|
サンプルNo.300 ◆ 環境・・ Excel 2003 & Windows XP
お世話になります。
500連発_実用マクロを購入し、P.212のサンプルNo.300（300.xls）を実行するとエラーになります。
msg内容
実行時エラー1004: 'アプリケーション定義またはオブジェクト定義のエラーです。'
.ChartObjects(1).Chart.Export の箇所で発生します。
よろしくお願いします。
それと、できれば、教えていただきたいのですが、ChartObjectsのexport は、bmp形式 はできないでしょうか？
|
|
Answer |
Copyright (C) 2007.7.15 永井善王 |
|
|
拙著 「Excel VBA そのまま使える実用マクロ 500連発」 を お求めいただき、ありがとうございます。
300番は 「埋め込みグラフをGIF形式で保存する」 と題するサンプルですね。
1つ目のご質問にある実行時エラーですが、念のためこちらでテストしてみましたが、再現できませんでした。
もしかして、グラフィックフィルタをカスタマイズしているようでしたら、Windowsの標準環境に戻してから実行してみてください。
2つ目の BMP形式で保存したい場合は、Macro1のうち2カ所を下記のように変更すれば、可能になります。
strFile = Path(ThisWorkbook.Path) & _
.ChartObjects(1).Name & ".bmp"
FilterName:="BMP", _
なお、JPGも、これに準じて変更すれば可能になります。
|
|
|
|
| |
|
|
