【VBA】指定した位置にシートを追加する(Addメソッド)

【VBA】指定した位置にシートを追加する(Addメソッド) VBA
この記事は約2分で読めます。

以前シートを最後にコピーするコードをご紹介しましたが、今回はAddメソッドを使って指定した位置にシートを追加するコードをご紹介します。

スポンサーリンク
[ad01]

シートを追加

それではAddメソッドを使ってシートを追加して行きましょう!

最初はShteet2の前にシートを追加するコードです。
Add Before」を使うことで指定したシートの前にシートが追加されます。

実行結果

シートを追加して名前を指定

前回と同じようにShteet2の前にシートを追加するコードですが、Nameプロパティで追加するシート名を指定することができます。

このコードを実行するとSheet2の前に「サンプル」というシートが追加されます。

「サンプル」シートを追加

シートを複数追加

Add After」を使うと指定したシートの後ろにシートが追加されます。

複数シートを追加する場合、一度にNameプロパティを使うことができないので、別々にシート名を変更しましょう。

このコードを実行するとSheet1の後ろに「追加2」、「追加3」、「追加4」というシートが追加されます。

複数シート追加してリネーム

まとめ

今回はAddメソッドを使って任意の位置にシートを追加する方法をご紹介しました。

まとめ

任意の位置にシートを追加するにはこのコードがオススメ。「Worksheets.Add(before:=Sheets(2)).Name = “サンプル”

シートの追加は良く使うと思いますので、Addメソッドを活用して下さいね。

この記事が気に入ったら
いいね ! しよう

Twitter で

VBAを学習する時間が取れない人

VBAは我流で組むことができますが、初心者だと作業時間が多く掛かったり、間違った部分を見つけるのに苦労したります。

VBAが組めるようになれば便利なことも多いですが、仕事をしながら勉強するのは結構大変…。

もし時間に追われて思うようにいかないのであればココナラで「VBAを組める人」に依頼してみませんか?

個人で販売しているため価格も抑えらえれます
まずはこちらから無料会員登録をして依頼をしてましょう!


VBA
スポンサーリンク
[ad01]
うめをフォローする
梅屋ラボ
タイトルとURLをコピーしました