Excelで特定の名前の新しいシートを追加するにはどうすればよいですか？

新しいシートを作成し、Excelで特定の名前を自動的に付けたい場合があります。 この記事では、現在のブックに特定の名前の新しいシートを追加する方法と、Excelの新しいブックに特定の名前のワークシートを作成するXNUMXつの方法を紹介します。

VBAコードを使用して、現在のブックに特定の名前の新しいシートを自動追加する
Kutools for Excelを使用して、新しいブックに特定の名前の新しいシートを自動追加する

VBAコードを使用して、現在のブックに特定の名前の新しいシートを自動追加する

次のVBAコードを使用して、現在のブックの最後に特定の名前の新しいシートを追加できます。

1。 押す 他の + F11 キーを同時に開いて アプリケーション向け Microsoft Visual Basic 窓。

2。 の中に アプリケーション向け Microsoft Visual Basic ウィンドウ、クリック インセット > モジュール.

3.以下のVBAコードをコピーしてに貼り付けます モジュール 窓。

VBAコード：現在のワークブックの最後に特定の名前の新しいシートを追加します

Sub CreateSheet()
'Updated by ExtendOffice 20181009
    Dim xName As String
    Dim xSht As Object
    On Error Resume Next
    xName = InputBox("Please enter a name for this new sheet ", "Kutools for Excel")
    If xName = "" Then Exit Sub
        Set xSht = Sheets(xName)
        If Not xSht Is Nothing Then
            MsgBox "Sheet cannot be created as there is already a worksheet with the same name in this workbook"
            Exit Sub
            End If
            Sheets.Add(, Sheets(Sheets.count)).Name = xName
        End Sub

4。 押す F5 コードを実行するためのキー。 ポップアップで Kutools for Excel ダイアログボックスで、このシートの名前を入力して、[ OK ボタン。 スクリーンショットを参照してください：

次に、特定の名前で新しいワークシートが作成され、現在のワークブックの最後に配置されます。

Kutools for Excelを使用して、新しいブックに特定の名前の新しいシートを自動追加する

このセクションでは、 シーケンスワークシートの作成 の有用性 Kutools for Excel。 このユーティリティを使用すると、新しいブックに特定の名前の新しいシートを簡単に追加できます。

1.特定の名前で新しいシートを追加するには、事前にこの名前をセルに入力する必要があります。 そして、 クツールズプラス > ワークシート > シーケンスワークシートの作成.

2。 の中に シーケンスワークシートの作成 ダイアログボックスで 空白のワークシート セクションに 基本ワークシート ドロップダウンリスト、選択 且つ範囲内 オプションをクリックし、特定のワークシート名を含むセルを指定して、最後に[ OK ボタン。 スクリーンショットを参照してください：

次に、セルからこの特定の名前の新しいワークシートが新しいワークブックにすぐに作成されます。

ノート: