Sheet

Sub シートの存在確認() Dim ws As Worksheet Dim flag As Boolean For Each ws In Worksheets If ws.Name = "〇〇" Then flag = True End ...

'「temp」シートを末尾に移動 Worksheets("temp").Move after:=Worksheets(Worksheets.Count)

'「abc」シートを削除 Application.DisplayAlerts = False Worksheets("abc").Delete Application.DisplayAlerts = True

'Sheet1シートの前に「data」シートをコピー Worksheets("data").Copy Before:=Worksheets("Sheet1")

'アクティブシートの一つ前にシートを追加 Worksheets.Add '先頭に追加 Worksheets.Add Before:=Sheets(1) '末尾に追加 Worksheets.Add After:=Sheets(Workshee...