【VBA】Worksheets

シートを参照する

'アクティブなシートを参照する
Set ws = ActiveSheet

'シート名を指定して参照する
Set wb = ThisWorkbook
Set ws = wb.Worksheets("シート名")

'シート番号(一番左のシートが1)を指定して参照する
Set wb = ThisWorkbook
Set ws = wb.Worksheets(1)

ブックのシート数を取得する

Set wb = ThisWorkbook

'シート数を取得
ws_cnt = wb.Worksheets.Count

新しいシートを追加する

Set wb = ActiveWorkbook

'新しいシートを追加
wb.Worksheets.Add

'新しいシートを追加、追加したシートを変数に設定
Set ws_new = wb.Worksheets.Add

シートを削除する

Set wb = ThisWorkbook
Set ws = wb.Worksheets(2)

'シートを削除
ws.Delete

シート名を取得・変更する

Set wb = ThisWorkbook
Set ws = wb.Worksheets(1)

'シート名を取得
ws_name = ws.Name

'シート名を変更
ws.Name = "新しいシート名"

以上になります。
お読み頂き、ありがとうございました。