Excel VBA質問箱 IV

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

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


68287 / 76734 ←次へ | 前へ→

【12987】Re:マクロ実行するたびに列の参照を+1にした...
回答  ちん  - 04/4/20(火) 18:54 -

引用なし
パスワード
   washi さん こんばんは、ちんといいます。
▼washi さん:
>グラフで1日毎の推移を作成しているのですが、
>品目が多く、グラフにするのが大変です。
>ひとつのグラフで全ての品目の推移が見れるような、マクロを組んでいるのですが、
>なかなかうまくいきません、どなたかご教授ください。
>
>1.クロス集計を元にグラフを作っています
>    合計 品目・・・
>
> 日付 数値 数値
>  :
>  :
>2.別のシートにグラフを作成し、ボタンにマクロを組み込んで押すたびに、
> 次の品目のグラフがでるマクロを作成したいです。
>
>3.次のようなマクロ(自動生成ですが)を組んでみました。
> Sub Next()
>
>  ActiveSheet.ChartObjects("グラフ 1").Activate
>  ActiveChart.ChartArea.Select
>  ActiveChart.SetSourceData Source:=Sheets("クロス集計ver2").Range( _
>    "A:A,C:C"), PlotBy:=xlColumns
>
> End Sub
>しかし、ここから先に進めません「.Range( _"A:A,C:C")」の部分の
>「C:C」の部分がボタンを押すたびに+1にさせるには、
>どうしたらよいのでしょうか?
>
>すみませんがどなたかご教授下さい、宜しくお願いします。

ボタン操作で、+1していくには、
Dim Count1 as Integer  <-- この行をSUBの最上位行へ定義して下さい。
SUB NEXT()
End SUB

C:C をかえるのでしたら、Range=>Cells に変更した方がよいです。

以上、
0 hits

【12967】マクロ実行するたびに列の参照を+1にした... washi 04/4/20(火) 16:21 質問
【12987】Re:マクロ実行するたびに列の参照を+1にし... ちん 04/4/20(火) 18:54 回答
【12992】Re:マクロ実行するたびに列の参照を+1に... washi 04/4/20(火) 19:27 質問
【12994】Re:マクロ実行するたびに列の参照を+1に... Asaki 04/4/20(火) 19:49 回答
【12996】Re:マクロ実行するたびに列の参照を+1に... washi 04/4/20(火) 20:10 質問
【12997】Re:マクロ実行するたびに列の参照を+1に... Asaki 04/4/20(火) 20:13 回答
【13001】Re:マクロ実行するたびに列の参照を+1に... washi 04/4/20(火) 21:04 質問
【13003】Re:マクロ実行するたびに列の参照を+1に... Asaki 04/4/20(火) 22:01 回答
【13004】Re:マクロ実行するたびに列の参照を+1に... Asaki 04/4/20(火) 23:20 回答
【13014】Re:マクロ実行するたびに列の参照を+1に... washi 04/4/21(水) 10:46 お礼

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