Excel VBA質問箱 IV

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

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


9967 / 76734 ←次へ | 前へ→

【72322】SeriesCollection.Formula プロパティ参照時のエラー
質問  ぽぽ  - 12/7/12(木) 11:30 -

引用なし
パスワード
   環境 : Excel 2003

あるグラフの系列を参照する処理でエラーが出て困っています。
すべて同じシート内の範囲指定で作成されているグラフであり、
各系列の範囲は下記のようになっています。

      名前  値       項目軸     備考
系列1 :  $C$16  $D$16:$R*16   $D$15:$R$15  範囲内は全て空白
系列2 :  $C$17  $D$17:$R*17   $D$15:$R$15  範囲内は全て数値
系列3 :  $C$18  $D$18:$R*18   $D$15:$R$15  範囲内は全て数値
系列4 :  $C$19  $D$19:$R*19   $D$15:$R$15  範囲内は全て数値

この系列1の参照時にエラーが発生しています。

======================================================

〜 型宣言やらチャートオブジェクトのセットやら 〜

For i = 1 To .Chart.SeriesCollection.Count
  '// ここでエラー!
  tstrSeriesFormula = .Chart.SeriesCollection(i).Formula
  
  〜 処理部分 〜
  
Next i

======================================================

イミディエイトウィンドウにて i を 2〜4 に変更してみたところ、うまいこと Formula プロパティの値が取得できましたが、何故か 1 だけエラーが出て取得できませんでした。
値の範囲内が空白かどうかのチェック処理を入れるしか無いんでしょうか…?
よろしくお願い致します。
2 hits

【72322】SeriesCollection.Formula プロパティ参照時のエラー ぽぽ 12/7/12(木) 11:30 質問
【72323】Re:SeriesCollection.Formula プロパティ参... kanabun 12/7/12(木) 12:09 回答
【72324】Re:SeriesCollection.Formula プロパティ参... ぽぽ 12/7/12(木) 14:18 お礼
【72327】Re:SeriesCollection.Formula プロパティ参... あすなろ 12/7/12(木) 17:20 発言
【72331】Re:SeriesCollection.Formula プロパティ参... ぽぽ 12/7/12(木) 20:30 お礼
【72332】Re:SeriesCollection.Formula プロパティ参... あすなろ 12/7/12(木) 22:33 発言
【72344】Re:SeriesCollection.Formula プロパティ参... ぽぽ 12/7/17(火) 14:02 お礼

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