第66回.シートのコピー・移動・削除（Copy,Move,Delete）
シートをコピーや移動をしたり、また削除する場合の説明です、
マクロVBAでは、雛形シートをコピーして使ったり、不要なシートを削除することは頻繁にあります。
Worksheet.Copyメソッド、Worksheet.Moveメソッド
これら、WorkSheetオブジェクトのメソッドを使用します。
シートを削除するには、
Worksheet.Deleteメソッドを使用します。
シートのコピー・移動
シートを移動するには、Worksheet.Moveメソッドを使います。
シートの移動
式は、WorkSheetオブジェクトです。
Worksheets("シート名")
オブジェクト変数(Worksheet型)
等になります。
| Before | コピーしたシートを特定のシートの直前の位置に挿入するときに、そのシートを指定します。ただし、引数 After を指定すると、引数 Before を指定することはできません。 |
| After | コピーしたシートを特定のシートの直後の位置に挿入するときに、そのシートを指定します。ただし、引数 Before を指定すると、引数 After を指定することはできません。 |
備考
新規ブックが自動的に作成され、シートはそのブック内にコピー・移動されます。
エクセルの操作で、シートの「移動またはコピー」で、新規ブックを選んだ事と同じです。
Copyメソッドの使用例
Worksheets(1)だけの、新規ブックが作成されます。
Moveメソッドの使用例
Sheets("シート名")が、シートの最後に移動されます。
シートの削除
式.Delete
式は、WorkSheetオブジェクトです
Worksheets("シート名")
オブジェクト変数(Worksheet型)
等になります。
Deleteメソッドの使用例
先頭のシートが削除されます。
しかし、
シートを削除すると、以下のメッセージが表示され、マクロが中断します。
57回.Applicationのプロパティで説明しましたが、
これを入れる事で、このメッセージは出なくなります。
つまり、
Application.DisplayAlerts = False
Worksheets(1).Delete
このようにVBAを書きます。
Application.DisplayAlerts = Falseは、
Worksheets(1).Deleteより前に実行されれば、場所はどこでも大丈夫です。
同じテーマ「マクロVBA入門」の記事
第63回.ブックを開く（Open,Add）
第64回.ブックを閉じる・保存（Close,Save,SaveAs）
第65回.シートの挿入、名前の変更（Add,Name）
第66回.シートのコピー・移動・削除（Copy,Move,Delete）
第67回.総合練習問題7
第68回.シートの保護、ブックの保護（Protect）
第69回.シートの非表示（Visible）
第70回.ウィンド枠の固定（FreezePanes）
第71回.印刷（PrintOut）
第72回.印刷プレビュー（PrintPreview）
第139回.エクスポート（PDF/XPS）
新着記事NEW ・・・新着記事一覧を見る
ツイッターで出されたVBAのお題をやってみた｜エクセル雑感（1月13日）
イベントプロシージャーの共通化（Enter,Exit）｜ユーザーフォーム入門（1月13日）
Rangeオブジェクトの論理演算（差集合と排他的論理和）｜VBA技術解説（1月10日）
イベントプロシージャーの共通化｜ユーザーフォーム入門（1月7日）
コントロールの動的作成｜ユーザーフォーム入門（1月6日）
Evaluateメソッド（文字列の数式を実行します）｜VBA技術解説（1月5日）
エクスポート（PDF/XPS）｜VBA入門（1月2日）
分析関数（OVER句,WINDOW句）｜SQL入門（12月25日）
取得行数を限定するLIMIT句｜SQL入門（12月21日）
外部ライブラリ（ActiveXオブジェクト）｜VBA入門（12月21日）
アクセスランキング ・・・ ランキング一覧を見る
1.最終行の取得（End,Rows.Count）｜VBA入門
2.RangeとCellsの使い方｜VBA入門
3.セルのコピー&値の貼り付け（PasteSpecial）｜VBA入門
4.Range以外の指定方法（Cells,Rows,Columns）｜VBA入門
5.変数宣言のDimとデータ型｜VBA入門
6.繰り返し処理（For Next)｜VBA入門
7.マクロって何？VBAって何？｜VBA入門
8.セルに文字を入れるとは（Range,Value）｜VBA入門
9.空白セルを正しく判定する方法（IsEmpty,IsError,HasFormula）｜VBA技術解説
10.ひらがな⇔カタカナの変換｜エクセル基本操作
このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。