掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
VBのフォーム上にEXCELのグラフを表示させるには? (ID:84282)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
ありがとうございます。できました!! ただ、、、一応動けばいいとおもったのですが、せっかくなのでもう一つ ご教授ください。 稚拙なコードなので、恥ずかしい思いなのですが、それを覚悟で質問します。 ExcelのグラフをVB側でコントロールするとき、このような書き方でいいので しょうか。 普通はこう書くだろ、とか、このように書いたほうがいいです、などの 意見をお聞かせください。私は、一応グラフを取得できたというだけなのですが、 このように記述しました。 Private Sub Command1_Click() Dim appXLS As Object Set appXLS = CreateObject("excel.Application") appXLS.Application.Workbooks.Open ("C:\book1.xls") appXLS.Worksheets("sheet1").ChartObjects("グラフ 1").Copy Image1.Picture = Clipboard.GetData() Picture1.Picture = Clipboard.GetData() ' appXLS.Workbooks(1).Close savechange:=False appXLS.Quit Set appXLS = Nothing End Sub ただ、Excelをバックグラウンドで起動したかったので、コード側で閉じると 保存しますかと聞かれます。参考書等で書かれていたコードを引用したのですが どうもうまくいきません。その行はコメントブロックにしてあります。 あと複数のグラフオブジェクトはクリップボードにコピーした順番に 0,1,2、、、とインデックス番号がつくものなんでしょうか。 いろいろすいません。自分でも勉強しますが、よろしくお願い致します。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2020 Takeshi Okamoto All Rights Reserved.