Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

52641 / 76807

←次へ　｜　前へ→


	【29001】Re:グラフ表示値の変更・更新

りん

- 05/9/20(火) 23:34 -


	引用なし

	パスワード

たかしさん、こんばんわ

>グラフ１は、A列とCからE列の値
>グラフ２は、A列とFからH列の値
>になっています。
ダブルクォーテーションの位置がおかしいです。
Rangeオブジェクトの中の範囲を示す文字列の中に,入るのではなく、左上のセル範囲と右下のセル範囲を指定したことになっているので、つながってしまっています。
↓確認
Sub test2()
　 rowcount1 = 10
　 With Sheets("Sheet1")
　　　MsgBox .Range("A1:A" & rowcount1, "C1:E" & rowcount1).Address
　　　MsgBox .Range("A1:A" & rowcount1 & ", C1:E" & rowcount1).Address
　 End With
End Sub

なので、
ActiveChart.SetSourceData Source:=Sheets("Sheet1").Range( _
　　　 "A1:A" & Rowcount1 & ",C1:E" & Rowcount1), PlotBy:=xlColumns

こんな感じです。

1 hits

▼

【28932】グラフ表示値の変更・更新 たかし 05/9/18(日) 18:26