Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


69511 / 76732 ←次へ | 前へ→

【11739】Re:グラフの元データ範囲の取得
お礼  Excel大好きちゃん  - 04/3/15(月) 17:26 -

引用なし
パスワード
   ▼Kein さん:

ありがとうございます。
今、頂いたコードを実行してみました。
わたしのやり方がおかしいのか、途中でエラーで止まって
しまいました。変数の型があっていない、という メッセージです。
グラフをアクティブにしておいて
実行するんですよね?

お手を煩わしてばかりでごめんなさい。
どうも、ありがとうございました。 (^^♪

>系列から数式を取得し、カンマ区切りで分解するという方法は良いと思います。
>ただ、拝見したような複雑なコードが必要なのかは分かりません。
>もし既存のグラフに、コピー&ペーストでデータを繰り返し追加していたら、
>SERIES関数の数式がヘンな形になってしまうのは知ってますが、そのようなプロット
>範囲の拡大方法をしていないなら、最も単純な 4つの引数を持つ数式であるはず
>です。即ち
>
>=SERIES(系列名の文字列またはその参照, 項目軸範囲, 数値軸範囲, 系列のIndex)
>
>ですから単純に
>
>Dim SR As Series
>Dim SeriAry As Variant
>Dim x As Integer
>Dim ShN As String, PltAd As String
>
>Set SR = ActiveChart.SeriesCollection(1)
>SeriAry = Split(SR.Formula, ",")
>x = InStr(1, SeriAry(2), "!")
>ShN = Left$(SeriAry(2), x - 1)
>PltAd = Right$(SeriAry(2), Len(SeriAry) - x)
>
>と文字列を抜き出して
>
>Worksheets(ShN).Range(PltAd)
>
>をプロットしているデータ範囲、とすればよいと思います。

4 hits

【11584】グラフの元データ範囲の取得 Excel大好きちゃん 04/3/11(木) 18:51 質問
【11589】Re:グラフの元データ範囲の取得 ichinose 04/3/12(金) 8:40 発言
【11591】Re:グラフの元データ範囲の取得 Excel大好きちゃん 04/3/12(金) 9:25 お礼
【11594】Re:グラフの元データ範囲の取得 ichinose 04/3/12(金) 9:54 発言
【11597】Re:グラフの元データ範囲の取得 Excel大好きちゃん 04/3/12(金) 10:07 お礼
【11643】Re:グラフの元データ範囲の取得 ichinose 04/3/12(金) 22:40 発言
【11738】Re:グラフの元データ範囲の取得 Excel大好きちゃん 04/3/15(月) 17:23 お礼
【11644】Re:グラフの元データ範囲の取得 Kein 04/3/13(土) 0:01 回答
【11692】Re:グラフの元データ範囲の取得 ichinose 04/3/14(日) 21:41 発言
【11708】Re:グラフの元データ範囲の取得 Excel大好きちゃん 04/3/15(月) 9:46 発言
【11746】Re:グラフの元データ範囲の取得 ichinose 04/3/15(月) 18:36 発言
【11757】Re:グラフの元データ範囲の取得 ichinose 04/3/15(月) 21:57 発言
【11758】Re:グラフの元データ範囲の取得 更に訂正 ichinose 04/3/15(月) 22:22 発言
【12018】気づかなくて、お礼が遅くなりました。(^^♪ Excel大好きちゃん 04/3/22(月) 12:11 お礼
【11739】Re:グラフの元データ範囲の取得 Excel大好きちゃん 04/3/15(月) 17:26 お礼

69511 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free