Excel VBA質問箱 IV

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

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


11813 / 13646 ツリー ←次へ | 前へ→

【13970】グラフ作成のマクロ 04/5/18(火) 10:21 質問[未読]
【13974】Re:グラフ作成のマクロ Jaka 04/5/18(火) 10:40 回答[未読]
【13990】Re:グラフ作成のマクロ 04/5/18(火) 12:54 回答[未読]
【13992】Re:グラフ作成のマクロ Jaka 04/5/18(火) 13:06 回答[未読]

【13970】グラフ作成のマクロ
質問    - 04/5/18(火) 10:21 -

引用なし
パスワード
   グラフ作成のマクロを作りたいのですが
実行時エラー’13’ 型が一致しません。 とか
実行時エラー’9’  インデックスが有効範囲がありません。
というエラーが出ます。
また、作成したグラフもX軸のパラメータまでY軸パラメータになってしまいます。

記述では次のようになっております。
(カラムAがX軸、 カラムB−GがY軸パラメータになります。)

  Columns("A:G").Select
  Charts.Add
  ActiveChart.ChartType = xlXYScatterSmooth
  ActiveChart.SetSourceData Source:=Sheets("test").Columns("A:G")
  ActiveChart.Location Where:=xlLocationAsObject, Name:="test"

【13974】Re:グラフ作成のマクロ
回答  Jaka  - 04/5/18(火) 10:40 -

引用なし
パスワード
   こんにちは。
グラフのX軸、Y軸っていまだにわかりません。(すぐ忘れる。)

>  Columns("A:G").Select ←いらないと思います。
>  Charts.Add
>  ActiveChart.ChartType = xlXYScatterSmooth
>  ActiveChart.SetSourceData Source:=Sheets("test").Columns("A:G")
                               ↑
                 A1:G65536と言うことなんでしょうか?
                 なんにしても、Rnage("A1:G" & 最後のデータ)
                 と、した方が良いと思います。         
>  ActiveChart.Location Where:=xlLocationAsObject, Name:="test"

【13990】Re:グラフ作成のマクロ
回答    - 04/5/18(火) 12:54 -

引用なし
パスワード
   返答ありがとうございます。

グラフのX軸、Y軸は
X軸が横軸で、Y軸が縦軸になります。

回答していただいたグラフの範囲の件は、
こちらでも試していたのですが、
範囲指定してもできませんでした。

【13992】Re:グラフ作成のマクロ
回答  Jaka  - 04/5/18(火) 13:06 -

引用なし
パスワード
   ▼− さん:
>グラフのX軸、Y軸は
>X軸が横軸で、Y軸が縦軸になります。
>
>回答していただいたグラフの範囲の件は、
>こちらでも試していたのですが、
>範囲指定してもできませんでした。

何ができなかったのかよくわかりませんけど、
グラフに表示されている縦と横を入れ替えたい、と言うと事なのでしょうか?
これはエクセルが自動で設定しているので無理だと思います。

前に似たような質問を見て、思いついたのが別シートに縦横入れ替えた別の表をリンクして作っておき、それを元のデータにしてグラフを作ったら良いんじゃないのかなぁ、と思ったぐらいでした。

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