エクセル マクロ ｒａｎｇｅ

rangeの使い方が分かりません.　特にグラフの範囲指定の方法で・・・

1..　　r1=range("cells(28,RETU1)")　　？　ＲＥＴＵ1、ＲＥＴＵ2は、ｉｎｐｕｔｂｏｘで指定したい。
2. r2=range("cells(28,RETU1),cells(295,RETU2")　？
3. range("a28,a295","cells(28,RETU1),cells(295,RETU2").select ?　離れた範囲2つを一つの範囲にしたグラフを書きたい。
4.　　inputboxで列名を記入するとき、数字でないといけないのか、アルファベットでもいいのですか?
5. range("cells(28,RETU1)").activate ?
以上を別法で以下のようにしたら?
6.　　Dim r1 As RANGE ・・・となって、Ｒａｎｇｅになりません。　　 このあと、例えば、 ｒ1.select とかｒ1.activateでいいですか？
7. set R1=range("cells(28,RETU1),cells(250,RETU2")
set R2=range(a28,a250)
unite (R1,R2) ?

No.1 回答者： keithin 回答日時： 2013/08/03 17:03

基本的なマナーですが、ご相談では１つの投稿で１つのご質問内容とし、１つずつ疑問点を解決して次のご相談投稿につないでいくようにしてください。

基本的な文法もまだ理解できていない今の状態で、あれこれ詰め込みで質問し回答を受け取っても、パンクするだけです。



サンプルマクロ１：グラフ以前に、まずrangeやcellsを正しく使える
sub macro1()
　dim h as range
　dim c as variant

　c = inputbox("列を数字または文字で記入")
　set h = range(cells(28, c), cells(250, c))
　h.select
end sub


サンプルマクロ２：範囲を番地で指定し折れ線グラフを描く
sub macro2()
　dim Target as range
　dim c1 as string, c2 as string

　c1 = inputbox("左上セル番地をA1形式で記入(A1と記入)")
　c2 = inputbox("右下セル番地をA1形式で記入(C8と記入)")
　set target = range(c1 & ":" & c2)

　charts.add
　activechart.charttype = xllinemarkers
　activechart.setsourcedata source:=target
　activechart.location where:=xllocationasobject, name:="sheet1"
end sub