VBA シートを追加する
VBAで、シートを追加するコードを記述してます。
環境
- OS windows10 64bit
シートを追加
シートを追加するには、「Add」を使用します。
適当なボタンを用意して、以下のソースコードを記述します。
Private Sub CommandButton1_Click()
Worksheets.Add
End Sub
実行してみます。
アクティブなシートの前に追加されていることが確認できます。
後ろに追加
後ろに追加したい場合は、「After:=」を使用します。
Private Sub CommandButton1_Click()
Worksheets.Add After:=ActiveSheet
End Sub
実行結果
シート名を設定
シート名を設定して追加したい場合は、以下のコードで可能です。
Private Sub CommandButton1_Click()
Dim w As Worksheet
Set w = Worksheets.Add(After:=ActiveSheet)
w.Name = "newSheet"
End Sub
実行結果
-
前の記事
python enumerateで指定した開始番号からスタートする 2022.06.17
-
次の記事
sqlite アルファベットの大文字を小文字に変換する 2022.06.17
コメントを書く