ExcelWork.info

Excel(エクセル)のマクロ・VBA・関数・操作などのメモ

ワークシートの追加・削除(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ソース


実行結果

サンプルVBAソース 実行前

Add メソッド 使用例 1

実行後

Add メソッド 使用例 2



 - ブック・シートの操作 , , , , , ,

Message

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください

  関連記事

ユーザー設定のビュー(CustomViews プロパティ)

ユーザー設定のビュー CustomViews コレクションは、ユーザー設定ビュー …

ウィンドウを拡大・縮小(Zoom プロパティ)

ウィンドウを拡大・縮小(Zoom プロパティ) ウィンドウの表示サイズをパーセン …

アクティブプリンタの設定・取得
アクティブプリンタを変更(ActivePrinter プロパティ)

ActivePrinter プロパティ ActivePrinter プロパティを …

印刷する用紙の向きを設定(PageSetup.Orientation プロパティ)

PageSetup.Orientation プロパティ PageSetup.Or …

表示されているセル範囲を取得(VisibleRange プロパティ)

VisibleRange プロパティ 現在表示されているセル範囲(Range オ …

ブックを参照(Workbooks プロパティ,Windows プロパティ)

アクティブなワークブックを参照 現在使用中のワークブック、複数ある場合は一番手前 …

枠線を含めて印刷(PageSetup.PrintGridlines プロパティ)

PageSetup.PrintGridlines プロパティ PageSetup …

アウトライン記号の表示・非表示(DisplayOutline プロパティ)

アウトライン記号の表示・非表示(DisplayOutline プロパティ) Di …

シート見出しの色を設定
シート見出しの色を設定(Tab プロパティ)

シート見出しの色を設定 Tab オブジェクトの Color プロパティ、Colo …

ウィンドウの分割(Split プロパティ,SplitColumn プロパティ,SplitRow プロパティ)

ウィンドウの分割と解除 ウィンドウ(ワークシート画面)を分割するには、Split …