エクセルデータ整理方法について（効率化）

質問

こんにちは。標記の件で質問があります。
XPパソコンのエクセル2003で、データ整理を効率良くしたいと思いますが、
その方法がわかりません。ご存知であれば教えてください。

１．エクセルのワークシート（sheet1）A5のセルの数字を、ワークシート(sheet100)のB8のセルに
　　入力したいと思います。（この作業だけならばリンク貼付け等で良いと思います。）
２．ここが問題なんですが、、ワークシート（sheet2）～(sheet99)までのA5のセルの数字をワークシー　　ト(sheet100)のB9～B107までのセルに順に入力できる方法はありますか。

宜しくお願いします。

回答No.1

kagakusuki · ベストアンサー

もし、参照先のSheetが、Sheet1、Sheet2、Sheet3・・・・・Sheet99、という具合にSheet名が、「Sheet＋正の整数」という形式になっていて、途中に欠番が無い場合には、Sheet100のB8セルに、次の数式を入力してから、Sheet100のB8セルをコピーして、Sheet100のB9～B107の範囲に貼り付けると良いと思います。

=INDIRECT("Sheet"&ROW(1:1)&"!A5")

　尚、先頭に来るSheetがSheet1ではなく、Sheet2の場合は、数式中の

ROW(1:1)

の部分を

ROW(2:2)

に変えて、

=INDIRECT("Sheet"&ROW(2:2)&"!A5")

として下さい。

　それから、Sheet名が数字の単純な増減では表す事が出来ない場合には、まず、適当な列（ここでは仮にSheet101のA列とします）に

Sheet101のA1セルに　シート名
Sheet101のA2セルに　Sheet1
Sheet101のA3セルに　Sheet2
Sheet101のA4セルに　Sheet3
　　　　・　　　　　　・
　　　　・　　　　　　・
　　　　・　　　　　　・
Sheet101のA100セルに　Sheet99

という具合に各SheetのSheet名を入力しておきます。（Sheet101のA1セルは必ずしも必要という訳ではありません）
　そして、Sheet101のB8セルに、次の数式を入力してから、Sheet101のB8セルをコピーして、Sheet101のB9以下に貼り付けると良いと思います。

=IF(ISERROR(INDIRECT(INDEX(Sheet101!$A:$A,ROW(2:2))&"!IV65536")),"",INDIRECT(INDEX(Sheet101!$A:$A,ROW(2:2))&"!A5"))

回答No.2

mu2011

一例です。
Sheet100のB8に=INDIRECT("sheet"&ROW(A1)&"!A5")を設定、下方向にコピー