アクセス上位ページ

Excel VBA ≫ 1．基礎編 - ワークシート ≫ (7)-c．ワークシートの追加

【ページ内リンク】

ワークシートの追加 - Add メソッド

ワークシートを追加するには Worksheets コレクションの Add メソッドを使用します。ワークシートを挿入する位置は Before または After のどちらかの引数で指定することができます。引数 Before および After を両方省略すると一番左端にシートが追加されます。

【構文】
Worksheets.Add ( [Before] [, After] [, Count] [, Type] )

引数名	省略	定数／データ型	説明
Before	○	Variant型（シートオブジェクト）	指定したシートオブジェクトの直前に、新しいシートを追加します。
After	○	Variant型（シートオブジェクト）	指定したシートオブジェクトの直後に、新しいシートを追加します。
Count	○	Variant型	追加するシートの数を指定します。既定値は 1 です。
Type	○	xlChart	グラフシート
		xlDialogSheet	ダイアログシート
		xlExcel4IntlMacroSheet	Excel バージョン 4 International Macro シート
		xlExcel4MacroSheet	Excel バージョン 4 マクロシート
		xlWorksheet	ワークシート（既定値）

Add メソッドの使用例1

Sub sample_eb073_01()

    '左から2番目にシートを2枚追加
    Worksheets.Add After:=Worksheets(1), Count:=2

End Sub

⇒　サンプルマクロ集へ

ThisWorkbook
ワークブックの指定を省略すると処理時点でアクティブになっている（最前面に表示されている）ブックが処理の対象となります。もし、処理の対象を実行したマクロが組み込まれているブックに限定したい場合はシートのまえに"ThisWorkbook"をつけてください。

（例）ThisWorkbook.Worksheets.Add

Add メソッドの使用例2

Sub sample_eb073_02()
    Dim mySheet     As Worksheet

    'シートを追加し、その追加したシートの参照を変数へ設定
    Set mySheet = Worksheets.Add _
                  (After:=Worksheets(Worksheets.Count))

    With mySheet
        .Name = "DDD"   '追加したシートの名前を変更

        'セルのフォント名とフォントサイズを変更
        With .Cells.Font
            .Name = "MS ｺﾞｼｯｸ"
            .Size = 9
        End With

        .Range("A1").Value = "テスト"
    End With
End Sub

⇒　サンプルマクロ集へ

⇒　オブジェクト変数と Set ステートメント
⇒　With ステートメント
⇒　セルの書式（フォント）

参考

Sub sample_eb073_03()
    'シートの追加とプロパティの変更
    With Worksheets.Add(After:=Worksheets(Worksheets.Count))
        .Name = "DDD"   '追加したシートの名前を変更

        'セルのフォント名とフォントサイズを変更
        With .Cells.Font
            .Name = "MS ｺﾞｼｯｸ"
            .Size = 9
        End With

        .Range("A1").Value = "テスト"
    End With
End Sub

⇒　サンプルマクロ集へ

⇒　With ステートメント
⇒　セルの書式（フォント）

＜サイト内関連リンク＞ 関連リンクもチェック！！

- ワークシートの削除（ Delete メソッド）

カテゴリ内ページ

Excel VBA ～総目次～
- 1．基礎編

-- (7)．ワークシート

--- (7)-a．SheetsとWorksheets
--- (7)-b．ワークシートの数
--- (7)-c．ワークシートの追加
--- (7)-d．ワークシートオブジェクトの指定方法
--- (7)-e．ワークシートの名前
--- (7)-f．ワークシートのインデックス
--- (7)-g．ワークシートの表示
--- (7)-h．オートフィルターモード
--- (7)-i．ワークシート内の使用済みセル
--- (7)-j．ワークシート内のコメント
--- (7)-k．Activate メソッド
--- (7)-l．Copy、Move メソッド
--- (7)-m．Delete メソッド
--- (7)-n．PrintPreview メソッド
--- (7)-o．PrintOut メソッド
--- (7)-p．印刷ヘッダー、フッターの設定

▲
Page
Top