【VBA】Worksheets
~簡単な自己紹介~
- 嫁と猫3匹と暮らすフルリモートの三十路SE
- 投資・節約・副業で資産形成中
- 現在の金融資産は約1,750万円、めざせアッパーマス層(資産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 = "新しいシート名"
以上になります。
お疲れさまでした。