Excel VBAで各ファイル各シートを1シートにまとめる

各ファイル、各シートにばらばらに存在するデータをコピーし、1シートにまとめデータベースを持ってしまえば、処理が楽になる事がありそうです。そんな時に使おうと、1シートにまとめるExcel VBAのマクロを作ってみました。

シート最終行の取得は、No.8 ワークシートの最終行、最終列を取得する(なにぬねのーつ)を参考にしました。


Excel VBAでフォルダ内の各ファイルの指定シートを一括削除する

Excelシート操作の自動化に関するExcel VBAマクロを投稿します。

フォルダ内の各ファイルの指定シートを、一括で削除したい場合に使うマクロを作成しました。このマクロを記述したファイルを同じフォルダに置いて、マクロを実行して使います。

2行目:フォルダ内のファイルを取得します
5行目:ここに消去したいシート名を記述します
15行目:シートを消去する際に警告が表示される事でマクロの動作が一時停止しないように、警告表示機能をOFFにしておきます。

フォルダにExcelファイル以外のファイルが存在している場合や、ファイルに指定したシートが存在しない可能性は想定していません。