アクティブシートの後にシートを追加するには?

Question 10.5   Previous Next
Excel 97でワークシートの追加で、マニュアル上での記述 ActiveWorkbook.Worksheets.Addで確かに追加はできましたが、アクティブシートの前に追加されます。
後への追加(Addの後にAfterの設定と書いてあります)の仕方がわかりません
Answer   Copyright (C) 1998.9.22 永井善王
下記の2ステップで可能となります。

  [1] アクティブシートの名前を調べて覚えます
  [2] Add afterの記述を、覚えたシート名を使って書く

具体的には、下記のとおりです。
    Worksheets.Add after:=Worksheets(シート名)  'アクティブシートの後へ追加する
くわしく知りたければ Macroのページの 「シートを追加する」 を見てください。

 

Excel VBA Macro