【VBA】Worksheets
～簡単な自己紹介～
- 嫁と猫3匹と暮らすフルリモートの三十路SE
- ブリッジSE的なポジションを務めることが多く、チーム運営、顧客折衝、ベンダーコントロールが得意
- 投資・節約・副業で資産形成中
- 現在の金融資産は約1,650万円、めざせアッパーマス層（資産3,000万円）
シートを参照する
'アクティブなシートを参照する
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 = "新しいシート名"以上になります。
お疲れさまでした。
