エクセルの全シートのデータ反映について

質問

エクセルについて質問があり、投稿させて頂きました。
わかる方がいましたら、回答をお願いします。

表示用シートと入力用シートがあります。
表示用は必ず1シート、入力用は毎回シート数が異なり、シート名も変わります。

この場合、入力用シートに入力したデータを表示用シートに表示するには、どういう関数を使えば良いのでしょうか。
参照すべき入力シートのデータのセルは、どのシートも一緒です。

例）
入力用シートの、それぞれB4セルを、表示用シートのA1~A4セルに表示する。
今回はA、B、C、Dの4つの入力用シートだったが、次回はE、F、G、H、Iの5つの入力用シートになる。

回答No.1

keithin · ベストアンサー

＞シート名も変わります。

関数で対応する方法はありません。

方法１：
表示用シートのＢ１からＢ４に表示用シートのシート名を羅列する
Ａ１に
=INDIRECT(B1&"!B4")
と記入し、Ａ４までコピー貼り付ける

方法２：
ＡＬＴ＋Ｆ１１を押す
現れた画面で挿入メニューから標準モジュールを挿入する
現れたシートに下記をコピー貼り付ける

function myf(index as long, target as range)
myf = worksheets(index).range(target.address)
end function

表示用シートをブックのシート並びの右端に移動する
表示用シートのＡ１セルに
=myf(row(A1),$B$4)
と記入、下向けにコピーする

お礼

できました！
分かりやすい解説ありがとうございました。