Excel で新しいワークシートを自動的に生成する方法

2年 ago
桜, 春樹
1 minute

Excelでは、以下の手順でワークシートを自動生成できます。

  1. Excelを開いて、新しいブックを作成します。
  2. ワークブックでワークシートを作成する場所を選択します。
  3. 「挿入」タブをクリックし、「表」グループの「表」を選択します。
  4. Excelは、選択した位置に新しいワークシートを挿入します。
  5. 新しいワークシートを挿入するためのショートカットはShift+F11です。
  6. 上記の手順を繰り返して、必要な数のシートを作成します。

また、データや条件に基づいてワークシートを自動的に生成する必要がある場合は、エクセルのマクロまたは VBA プログラミングを使用できます。マクロまたは VBA コードを記述することで、特定のルールや条件に基づいて自動的にワークシートを生成できます。

以下はデータを自動的にワークシートに生成する VBA コードのサンプルです。

Sub GenerateSheets()
Dim rng As Range
Dim cell As Range
Dim ws As Worksheet
'指定数据范围
Set rng = Sheets("Sheet1").Range("A1:A10")
'循环遍历数据范围
For Each cell In rng
'取得数据值
value = cell.Value
'判断是否已存在同名工作表
If Not WorksheetExists(value) Then
'创建新的工作表
Set ws = Worksheets.Add
ws.Name = value
End If
Next cell
End Sub
Function WorksheetExists(shtName As String) As Boolean
Dim ws As Worksheet
On Error Resume Next
Set ws = ThisWorkbook.Sheets(shtName)
On Error GoTo 0
WorksheetExists = Not ws Is Nothing
End Function

上記コードをVBAエディター（Alt + F11で起動します）にコピー＆ペーストし、実行します。コードはデータ範囲の値に応じて自動的に対応するワークシートを作成します。

bannerAds