Excel VBA質問箱 IV

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

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


35599 / 76738 ←次へ | 前へ→

【46336】グラフの追加
質問  oda  - 07/1/31(水) 11:19 -

引用なし
パスワード
   グラフ作成を自動化しようとしていますが、ループが上手くできません。

各値(*)は、別途インプットボックスにて取得します。
ループの数は最終的にはユーザーが選択して終了するまでになります。
(a)の値を回し同じグラフに書きたいのですが、2順目からはエラーが出て
止まってしまう状況です。

以下その部分のソースです


Sub sample1()
 For a = 1 To 5
  ActiveChart.SeriesCollection.NewSeries
  With ActiveChart.SeriesCollection(a)
  .ChartType = xlLine
  .XValues = Range(*)
  .Values = Range(*)
  .Name = Range(*)
  End With
  a = a + 1
 Next
End Sub

aは無事ループしていますが、代入するとエラーになる様で、そもそも
やり方が悪いのかすら分からない状況です。
どうか御助けねがいます。

0 hits

【46336】グラフの追加 oda 07/1/31(水) 11:19 質問
【46338】Re:グラフの追加 Kein 07/1/31(水) 11:43 回答
【46343】Re:グラフの追加 oda 07/1/31(水) 16:40 質問
【46352】Re:グラフの追加 Kein 07/1/31(水) 17:18 発言
【46359】Re:グラフの追加 マクラー 07/1/31(水) 19:18 発言

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