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