Articleシートを追加する名前を付けてシートを追加するセルから名前を付けて新しいシートを作成する他のシートの前/後にシートを追加する別のシートの後にシートを挿入するワークブックの末尾にシートを追加するワークブックの先頭にシートを追加するシートを変数に追加するその他のシートの追加の例シートが存在しない場合にシートを作成する名前の一覧からワークシートを作成するVBAのコーディングが簡単にこのチュートリアルでは、VBAを使用してワークシートを追加/挿入する方法について説明します。シートを追加するアクティブシートの前にSheetを追加するシンプルなマクロです。Subシートを挿入すると、新しいシートがアクティブシートになります。ActiveSheetオブジェクトを使って、新しいシートを操作することができます。(この記事の下部で、新しいシートを変数に直接挿入する方法を紹介します。"NewSheet"名前を付けてシートを追加する新しいシートを作成する際に、シート名を定義することもできます。GeneratorGenerateセルから名前を付けて新しいシートを作成するまたは、セルの値を使用して新しいシートに名前を付けることもできます。Range("a3").Value他のシートの前/後にシートを追加する新しいシートが挿入される場所を選択することもできます。プロパティを使用すると、ワークブック内の特定の場所にシートを挿入できます。別のシートの後にシートを挿入するこのコードは、新しいシートを指定したシートの後に挿入します。After:=Sheets("Input")こちらは、新しいシートを指定したシートの後に挿入し、さらにシート名を指定します。"NewSheet"2番目の例では、余分に括弧が必要であることに注意してください。(最初の例では、2番目の括弧が追加されるとエラーが発生します。)指定したシートの前に挿入することもできます。"NewSheet"これらの例では、シートの位置を決定するために使用するシートに明示的に名前を付けています。多くの場合、シートのインデックス番号を代わりに使用し、シートをワークブックの先頭または末尾に挿入することができます。ワークブックの末尾にシートを追加するワークブックの末尾にシートを追加するには、次のようにします。After:=Sheets(Sheets.Count)ワークブックの先頭にシートを追加するワークブックの先頭に名前を付けてシートを追加するには以下のようにします。"FirstSheet"シートを変数に追加するこのコードでは、シートを作成すると同時に変数に代入しています。Sheets.Addこれで、変数「ws」を使って新しいシートを参照することができます。"VarSheet"その他のシートの追加の例シートが存在しない場合にシートを作成するシートがまだ存在しない場合にのみ、シートを作成したい場合があります。名前の一覧からワークシートを作成する次のルーチンは、1つの列の内容を見て、それらの名前で現在のワークブック内にExcelワークシートを作成します。同じシート名がすでに存在するかどうか、別の関数を呼び出して確認し、存在する場合はそのシートを作成しません。Functionこのように、シート2のセルA1:A10に以下のようなテキストがあるとします。すると、以下のようなシートが作成されます。「Dog」はセル内には2つありますが、実際に作成される同名のシートは1つです。このチュートリアルで使用する.XLSファイルをダウンロードするには、ここをクリックしてください。VBAのコーディングが簡単にVBAのコードをネットで探すのはもうやめましょう。AutomateExcel.com.。