質問です。

エクセルの20個のファイルに（1a、2b･･･から20tとする）のファイル名
をそれぞれにつけて、とある１つのディレクトリにまとめて保存し
たそれらを一つずつオープンして、それぞれのファイルのSheet1
にあるセルの情報（それぞれのファイルで1行目（1,1）〜（1,40）に
まとめてある）を、情報をまとめるためのファイル「Answer」のSheet1に
1行ずつ出力するプログラムを教えていただけないでしょうか。
（最終的にはAnswerのSheet1は20行情報が貼り付けられることになります）

（ファイル名に規則性がなくても出来るのであればなお嬉しいです）

どうかよろしくお願いしますm(_ _)m