Excelで複数のシートを複数回コピーするにはどうすればよいですか？

Excelの「移動またはコピー」コマンドを使用すると、1つのワークシート、複数の特定のワークシート、またはすべてのワークシートを一度に現在アクティブなワークブックまたは別のワークブックにコピーできます。

1ワークシートをコピーする対象のワークブックで、シートタブバー上の複数のワークシートを選択します。
注釈： CTRL キーを押しながら、シートタブバー上でクリックすることで隣接していない複数のシートタブを選択できます； SHIFT キーを押しながら、シートタブバー上で最初と最後のシートタブをクリックすることで隣接している複数のシートタブを選択できます。

2選択したシートタブを右クリックし、コンテキストメニューから 移動またはコピー を選択します。スクリーンショットをご覧ください：

3「 移動またはコピー 」ダイアログボックスで、次の設定を行ってください：
(1) コピー先のワークブックを 対象のブック ドロップダウンリストから指定します。現在アクティブなワークブック、別の開いているワークブック、または新しいワークブックを選ぶことができます。
(2) シートタブバー上でのコピーされたシートの位置を指定します。既存のすべてのシートの後に配置することもできます。
(3) コピーを作成 オプションをチェックしてください。このオプションをチェックしない場合、選択したワークシートは移動されます。
(4) OK ボタンをクリックします。

これで、選択したワークシートが指定されたワークブックに1回だけコピーされます。これらのワークシートを複数回コピーするには、操作を繰り返す必要があります。

Excelで複数のワークシートをコピーするのは簡単ですが、現在のワークブック内で複数のワークシートを複数回コピーしたい場合は、「移動またはコピー」コマンドを何度も使用する必要があります。これをワンクリックで実行できるようにしたいと思いませんか？サードパーティ製アドインであるKutools for Excelの「ワークシートのコピー」機能を使えば、Excelで複数のワークシートをワンクリックで複数回コピーすることができます。

1次をクリックします： Kutools Plus > ワークシートのコピースクリーンショットをご覧ください：

注釈：次をクリックします： Kutools Plus > ワークシート > ワークシートのコピー この機能を利用できます。

2次のように設定を適用します： ワークシートの一括コピー ダイアログボックス：
(1) 「コピーするワークシート」セクションで、コピーしたいワークシートにチェックを入れます。 選択したワークシートのコピー セクション。
(2) 次を指定します： コピー回数.
(3) コピーされたシートの位置を決定します。たとえば、すべてのワークシートの前または後ろ、現在のワークシートの前または後ろなどです。
(4) Ok ボタンをクリックします。

3確認ボックスが表示され、チェックしたワークシートが指定回数コピーされたことを通知しますので、 OK ボタンをクリックして終了します。スクリーンショットをご覧ください：

Kutools for Excelのこの「ワークシートの一括コピー」機能により、アクティブなワークブック内の複数の指定されたワークシートを数回のクリックだけで複数回コピーできます。無料体験版をお試しください！

指定されたワークシートを10回コピーしたい場合、「移動またはコピー」コマンドを使用すると時間がかかり、何度も操作を繰り返す必要があります。しかし、以下のVBAコードを使用すると、一度にワークシートを10回コピーできます。

ALT + F11キーを押しながら保持すると、Microsoft Visual Basic for Applicationsウィンドウが開きます。

2. Click 挿入 > モジュール, and paste the following code in the Module Window.

VBA: 特定のワークシートを現在アクティブなワークブックに複数回コピーする

Sub Copier ()
Dim x As Integer
x = InputBox("Enter number of times to copy Sheet1")
For numtimes = 1 To x
ActiveWorkbook.Sheets("Sheet1").Copy _
After:=ActiveWorkbook.Sheets("Sheet1")
Next
End Sub

注: 上記のコードで、「Sheet1」をコピーするシートの名前に置き換えてください。

3次に、 F5 キーを押してコードを実行すると、必要なシートコピーの数を尋ねるプロンプトボックスが表示されます。

次に OKをクリックすると、指定されたワークシートがアクティブなワークブックに100回コピーされます。

Kutools for Excelがインストールされている場合、その「ワークシートの結合」機能を使用して、複数の閉じられたワークブックから複数のワークシートを新しいワークブックに数回のクリックだけでコピーすることもできます。

1次をクリックします： Kutools Plus > 統合 をクリックして「ワークシートの結合」機能を起動します。

2「ワークシートの結合 – ステップ1/3」ウィザードで、次のオプションをチェックし、「次へ」ボタンをクリックします。スクリーンショットをご覧ください： 複数のワークブックからデータを1つのワークシートにコピー オプションをチェックし、 次へ ボタンをクリックします。スクリーンショットをご覧ください：

3「ワークシートの結合 – ステップ2/3」ウィザードで、次のスクリーンショットに従って操作してください：
(1) 「追加」をクリックし、「ファイル」または「フォルダ」を選択して、ワークシートをコピーするワークブックを追加します。 追加 > ファイル または フォルダ をクリックして、ワークシートをコピーするワークブックを追加します。
(2) 「ワークブックリスト」セクションで、コピーするワークシートを持つワークブックにチェックを入れます。 ワークブックリスト セクションで、コピーするワークシートを持つワークブックにチェックを入れます。
(3) 「ワークシートリスト」セクションで、コピーするワークシートにチェックを入れます。 ワークシートリスト セクションで、コピーするワークシートにチェックを入れます。
(4) 上記の手順を繰り返して、他のワークブックからコピーするワークシートを選択します。 (2) および (3) をクリックして、他のワークブックからコピーするワークシートを選択します。
(5) 次へ ボタンをクリックします。

4「ワークシートの結合 – ステップ3/3」ウィザードで、必要に応じてコピー設定を構成し、「完了」ボタンをクリックします。 完了 ボタンをクリックします。

5新しいダイアログボックスで、新しいワークブックを保存する宛先フォルダを指定し、「ファイル名」ボックスに新しいワークブックの名前を入力し、「保存」ボタンをクリックします。スクリーンショットをご覧ください： ファイル名 ボックスに新しいワークブックの名前を入力し、 保存 ボタンをクリックします。スクリーンショットをご覧ください：

ここで、新しいワークブックを開くことと組み合わせのシナリオを保存することを求めるもう2つのダイアログボックスが表示されますので、必要に応じてボタンをクリックしてください。これで、複数のワークブックから指定されたすべてのワークシートが一度にコピーされました。

この 統合（ワークシート）ユーティリティを使用すると、次のリストに示すように、ワークシートやワークブックを簡単にコピーして統合できます。 無料体験版をお試しください！
(1) 複数のワークブックから複数のワークシート/範囲を1つのワークシートに素早く結合する；
(2) 複数のワークブックにまたがる同じ名前のすべてのワークシートを1つのワークシートに素早くマージ/結合する；
(3) 複数のワークシートまたはワークブックを1つのワークブックに素早くマージ/結合する；
(4) 複数のワークシートからのデータを1つのワークシートに素早く集計/計算する。