エクセルで､シートごとの計算結果を別の表にする方法

質問

同じ形式のデータシートが１００枚ぐらいあり、このシート上で計算をした結果が１０個ほどあります。この結果の一覧表（１００×１０）を作り、グラフを作成する必要があります。
このとき、一覧表の先頭のセルにシート名とセルの番号を計算式としていれて、つまんで引っ張り１００までカウントアップして計算式を入力させたいのですが、うまくいきません。いちいち入力するのは邪魔くさいので､いい方法があれば教えてください。
ＶＢＡはよく分かりませんが､解決するならやってみますのでよろしくお願いします。

回答No.3

ARC · ベストアンサー

>B1=INDIRECT("'Data" & $A1 & "'!A$1")
>C1=INDIRECT("'Data" & $A1 & "'!B$1")
>と入力して横に引っ張ってみましたがカウントアップしてくれません。

B1の中身を変えるだけでは、横に引っ張る事は出来ません(「"'!A$1"」の部分が文字列として扱われているため)。
ちょっと工夫が必要ですね。
以下のようにしてみてください。

1:B1にA、C1にB、D1にC…と入力
2:A2に1、A3に2、A4に3…と入力
3:B2に =INDIRECT("'Data" & $A2 & "'!" & B$1 & "1") と入力
4:B2のセルを適当な範囲に複写

A列で、取得するシートの番号を指定、１行目で、取得する列を指定です。
取得する行は、INDIRECT… の末尾の『"1")』の部分ですね。

少しInDirect()の括弧の中身を説明してみますね。
Indirect関数は、セルのアドレスを文字列として、括弧の中に書くと、そのアドレスのセルの内容を返します。

=Indirect("A1")
と書けば、A1のセルの中身を返しますし、
=Indirect("SHEET2!A1")
と書けば、「SHEET2」と言う名前のシートのA1のセルの値を返します。

シート名!セルアドレス は、他のいろんな場所でも使えるんですが、シートの名称にスペースが含まれる場合は、シート名をシングルコーテーションで囲んで、「'Data Sheet'!A1」のように記述する必要があります。

$マークについては、ヘルプの「セルとセル範囲の参照について」の中の「相対参照と絶対参照」に載っています。
イルカ君か冴子先生に「セルとセル範囲の参照について」と聞いてみてください。
(簡単にいうと、「引っ張るときにどのような動作をするか」です。
「A1」のAの前に$が付いてると($A1)、横に引っ張ってもAの部分は変化しません。
同様に1の前に$があると(A$1)、縦に引っ張っても1の部分が変化しません。
$A$1だと、縦に引っ張っても横に引っ張っても、変化なしです。)

あと、式中の「&」は文字列を結合する演算子です。
1 + 1 = 2 と同様、 "A" & "1" = "A1" になります。
"SHEET" & A1 なら、SHEET という文字列と、A1のセルの中身を結合したものになります。(A1 に 1が入力されていれば、SHEET1 という文字列になる。)
一度、=INDIRECT("'Data" & $A2 & "'!" & B$1 & "1") のかわりに、 = "'Data" & $A2 & "'!" & B$1 & "1" として、試してみてください。

連続するシートの簡単な名づけ方は、聞いた事がありません。(多分無いと思います。)
マクロを使えば、自動処理で名付けることが出来ると思うんですが、それだと「簡単」とは言えませんね(^^:。

お礼

ＡＲＣ先生ありがとうございました！

ばっちりですぅ！！　

大変詳しい説明でよく分かりました。（シート名!セルアドレス）のことも理解でき、これからもっと活用できそうです。
あとＡ、Ｂ、Ｃ．．．は連続コピーできないんですね？これができたら言うことなしですが．．．

ちなみに冴子先生とはちょっと､ウマが合わないようです。
またよろしくお願いします。

邪魔くさがりのbantamでした。