ワークシートの追加・削除(Add メソッド・Delete メソッド)
2015/10/22
新しいワークシートを作成
Add メソッドで、新しいワークシートを指定した場所に作成します。
object.Add ( [ before, after, count, type ] )
引数・戻り値
- object ・・・ 対象となる Sheets コレクション、Worksheets コレクション、Charts コレクション を指定します。
- before ・・・ ここで指定したシートの直前に、新規のシートを追加します(省略可)。
- after ・・・ ここで指定したシートの直後に、新規のシートを追加します(省略可)。
- count ・・・ 追加するシートの数を指定します(省略可)。
- type ・・・ 追加するシートの種類を XlSheetType 列挙型 の定数またはその値を指定します。object により追加できるシートの種類に違いがあるので注意してください(省略可)。
定数 値 内容 xlWorksheet -4167 ワークシート xlExcel4MacroSheet 3 Excel 4 マクロ シート xlExcel4IntlMacroSheet 4 Excel 4 インターナショナルマクロシート xlDialogSheet -4116 ダイアログ シート xlChart -4109 グラフ
ワークシートの追加と名前の設定
新規にワークシートを作成し、名前を設定するには、Add メソッド を使用して、新規ワークシートを挿入後、Name プロパティ(詳細は、ブック・シートの名前を取得・設定(Name プロパティ) を参照)で名前を設定しますが、以下の様な書式を使って、1行で書くこともできます。
object.Add( [ before, after, count, type ] ).Name = sheetname
引数・戻り値
- object ・・・ 対象となる Sheets コレクション、Worksheets コレクション、Charts コレクション を指定します。
- before, after, count, type ・・・ 上記 Add メソッドの引数を参照してください。
- sheetname ・・・ 設定するシート名を文字列で指定します。
「TEST」という名前のワークシートを新規に作成する例
Worksheets.Add
Activesheet.Name = “TEST”
上記を1行で書く例
Worksheets.Add.Name = “TEST”
指定したワークシートを削除
Delete メソッド で、指定したワークシートを削除します。
object.Delete
引数・戻り値
- object ・・・ 対象となる Sheet オブジェクト、Worksheet オブジェクト、Chart オブジェクト を指定します。
- object で指定したシートを削除します。
Delete メソッド を実行すると、削除する前に、確認メッセージが表示されます。確認メッセージを表示させずに削除するには、一時的に、DisplayAlerts プロパティ を False に設定します。
Application.DisplayAlerts = False
ActiveWorksheet.Delete
Application.DisplayAlerts = True
Add メソッド・Delete メソッド 使用例
サンプルVBAソース
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
Sub Sample_WSht_Add_Delete() '新規ワークシートを「Sheet2」の直後に挿入 Application.Worksheets.Add after:=Worksheets("Sheet2") '「Sheet1」を削除 Application.DisplayAlerts = False Worksheets("Sheet1").Delete Application.DisplayAlerts = True End Sub |
実行結果
サンプルVBAソース 実行前
実行後
関連記事
-
-
印刷位置を中央に設定(CenterHorizontally, CenterVertically)
PageSetup.CenterHorizontally プロパティ PageS …
-
-
印刷設定(フッターに画像を指定)LeftFooterPicture,CenterFooterPicture,RightFooterPicture
フッターに画像を表示するには LeftFooterPicture プロパティ、C …
-
-
簡易印刷(PageSetup.Draft プロパティ)
PageSetup.Draft プロパティ PageSetup.Draft プロ …
-
-
分割したウィンドウの取得(Panes コレクション,Pane オブジェクト)
分割したウィンドウ 「ウィンドウ枠の固定」や「ウィンドウの分割」での、すべての領 …
-
-
Excel を全画面表示(DisplayFullScreen プロパティ)
DisplayFullScreen プロパティ DisplayFullScree …
-
-
指定された情報をブックから削除(RemoveDocumentInformation メソッド)
RemoveDocumentInformation メソッド 指定された種類の情 …
-
-
白黒印刷(PageSetup.BlackAndWhite プロパティ)
PageSetup.BlackAndWhite プロパティ PageSetup. …
-
-
ワークシートを参照する(Worksheets プロパティ)
Worksheets プロパティ Worksheets プロパティは、Works …
-
-
印刷:余白を設定 TopMargin,BottomMargin,LeftMargin,RightMargin,HeaderMargin,FooterMargin
余白を設定する 余白を設定する単位は、pt(ポイント:約 0.03528 cm) …
-
-
シートを保護・保護したシートを解除する(Protect メソッド・Unprotect メソッド)
Protect メソッド・Unprotect メソッド Protect メソッド …