マクロ記録機能を使ってグラフを作成して、コードを書いてみたのですが・・・

質問

ActiveChart.SeriesCollectio(1).XValues="='FILE1'!R300C2:R350C2"

ActiveChart.Location Where:=xlLocationAsObject, Name:="FILE1"

マクロ記録機能を使ってグラフを作成して、コードを書いてみたのですが、中に上記のコードが含まれていました。
シートネーム「FILE1」でシートを指定するのではなく、シート番号でシート指定したいのですが、「"='FILE1'!R～」と「～:=xlLocationAsObject, Name:="FILE1"」の部分は
どう書き換えたらよいのでしょうか。
よろしくお願いします。（Excel2000を使用しています。）

回答No.1

papayuka

試してないけど。

="='" & Worksheets(1).Name & "'!R300C2:R350C2"
Name:= Worksheets(1).Name

お礼

ありがとうございました。