ワークシートのコピー : Excel(エクセル)

Excel Tipsメニューに戻る

スポンサーリンク



Excel VBAでワークシートをコピーするにはCopyメソッドを使用します。
引数に、Afterを使うと指定したシートの右にコピーします。
引数に、Beforeを使うと指定したシートの左にコピーします。

引数を指定しなければ、新しいブック(エクセルファイル)が作成され、そこにコピーされます。

構文:
Worksheets("コピー元シート名").Copy After:=Worksheets("コピー先シート名")
Worksheets("コピー元シート名").Copy Before:=Worksheets("コピー先シート名")

Excelシート画面

■初期の画面
シートのコピー

■「シートの最後へ」ボタンをクリック
Sheet3の右隣へコピーしています。
コピー結果

スポンサーリンク



■「Sheet1の前へ」ボタンをクリック
Sheet1の左隣へコピーしています。
最初へのコピー結果

Excel VBA実行コード

Option Explicit

Private Sub CommandButton1_Click()
    Worksheets("Sheet1").Copy After:=Worksheets("Sheet3")
End Sub

Private Sub CommandButton2_Click()
    Worksheets("Sheet1").Copy before:=Worksheets("Sheet1")
End Sub

Excel Tipsメニューに戻る

スポンサーリンク






■■■
このサイトの内容を利用して発生した、いかなる問題にも一切責任は負いませんのでご了承下さい
■■■
当ホームページに掲載されているあらゆる内容の無許可転載・転用を禁止します


Copyright (c) Excel-Excel ! All rights reserved