【エクセル】複数のエクセルファイル（ブック）内のシートを一つにまとめる方法

2023.07.04 / 2023.07.04

本記事ではMicrosoftのエクセルにおける、複数のエクセルファイル（ブック）内のシートを一つにまとめる方法について解説していきます。

仕事でエクセルを使っていると、ファイル数が膨大な量になったエクセル群を１つのエクセルにまとめたい場面があります。

手動で作業すると多くの時間がかかってしまいますが、マクロを使うことであっという間に複数のエクセル内のシートを１つにまとめられます。

本記事を通して、複数のエクセルファイル内のシートを一つにまとめる方法について覚えてください。

複数のブック内のシートを一つにまとめる

複数のブック内のシートを一つにまとめる方法は以下の通りです。

手動で１つ１つコピーしてまとめる方法
マクロを使って複数のシートをまとめる方法

現時点ではエクセルの既存の機能で複数のエクセル内のシートを簡単に１つにまとめることはできません。手動で時間をかけてまとめる、またはマクロを作成してシートをまとめるしか方法がありません。

それぞれの方法について次項より詳しく解説していきます。

手動で１つ１つコピーしてまとめる方法

手動で１つ１つのエクセルをコピーして１つにまとめる方法は以下の通りです。

シートのタブを右クリックし、表示されたメニューから「移動またはコピー」を選択する

表示された画面から「移動先のブック」「挿入先」を選択し、「コピーを作成する」にチェックをしたら「OK」をクリック

エクセル：「移動先のブック」「挿入先」を選択し、「コピーを作成する」にチェックをしたら「OK」をクリック

上記の操作により「移動先のブック」で選んだブックにシートのコピーが挿入されます。これをまとめたいエクセルのシート分同じ操作をすることで、一つのブックにシートをまとめることができます。

マクロを使って複数のシートをまとめる方法

ここからはマクロを使った複数のエクセル内のシートをまとめる方法を解説します。

マクロとは

マクロとはコンピューターやアプリケーションの操作を自動化する機能です。マクロはエクセルで使う人の割合が非常に高いですが、エクセル以外でもOutlookやWordなどでもマクロを作成して利用することができます。

「マクロ=VBA」と考える方が多いですが、厳密には異なります。マクロは操作を自動化する機能そのものを表し、VBAはオフィス製品のマクロを作成するためのプログラミング言語です。

マクロとVBAについて詳しく知りたい方は以下記事をご参照ください。

VBAのコード

実際に私が作成したマクロのVBAコードは以下の通りです。

Sub combineSheets()
    Dim Files As Variant
    Dim File As Variant
    Dim InputSheet As Worksheet
    Set InputSheet = Worksheets(1)
    Dim From As Workbook

    Application.ScreenUpdating = False

    Files = Application.GetOpenFilename("Excelブック,*.xls?", MultiSelect:=True)
    If TypeName(Files) = "Boolean" Then: Exit Sub

    For Each File In Files
        Set From = Workbooks.Open(Filename:=File)
        From.Sheets().Copy After:=InputSheet

        From.Close SaveChanges:=False
    Next File

    Application.ScreenUpdating = True

End Sub