エクセルマクロのrangeオブジェクト

質問

グラフを作成する下記のマクロでRangeオブジェクトにて範囲指定しておりますが，これをR1C1形式で表現するにはどうすればよいでしょうか？

ActiveChart.SetSourceData Source:=Sheets(tmpSheetName).Range("A2:AM2,A81:AM81"), PlotBy:=xlRows

どうかよろしくお願いします．

回答No.3

hakone

こんな感じですかねぇ？

-------------------------------------------------
Dim 範囲 As range

With Sheets(tmpSheetName)
　Set 範囲 = Union(.range(.Cells(2, 1), .Cells(2, 39)), _
　　　　　　　　　　　.range(.Cells(81, 1), .Cells(81, 39)))
End With

ActiveChart.SetSourceData Source:=範囲, PlotBy:=xlRows
-------------------------------------------------

回答No.2

snoopy64

１セルの場合
Range("A5")→Range(Cells(5,1),Cells(5,1))・・・OK

範囲が１つの場合
Range("A5:C5")→Range(Cells(5,1),Cells(5,3))・・・OK

２つの離れた範囲の場合
Range("A5:C5","A8:C8")・・・できない

はずしてたらごめんなさい(>_<)

回答No.1

hakone

こんにちは。

Rangeの中を直接R1C1形式で指定することはできないはずです。
「AM」や「81」などを変数で指定したいということでしょうか？