エクセルで100個のブック形式のものがあります。行数はおのおの違います

質問

エクセルで100個のブック形式のものがあります。行数はおのおの違います

役に立った：0件

質問者：mjgoo
投稿日時：2010/05/05 13:50
困り度：

エクセルで100個のブック形式のものがあります。行数はおのおの違いますが、列数は同じです。
ファイルを1つのシートにつなげるにはどうすれば早くできるでしょうか。

この質問への回答は締め切られました。

回答(1件)

No.1ベストアンサー20pt

回答者：seastar3
回答日時：2010/05/05 17:52

かつてアドバイスしたコードが使えそうです。
コード中のxlsSheetオブジェクトの最終行まで調べるコードまで盛り込めば完璧でしょうが、とりあえず取り込んでから、オートフィルタで空白行を削除すれば対応できると思います。

ちなみに変数gyouへの最終行の取得は、
gyou = Worksheets(1).Range("A2").End(xlDown).Row
で可能です。

通報する