ワークシートの移動

ワークシートを移動する場合はWorksheetオブジェクトのMoveメソッドを使用する。

ワークシートを、あるワークシートの手前(左側)に移動する場合はBefore引数を指定する :

Worksheetオブジェクト.Move Before

ワークシートを、あるワークシートの後ろ(右側)に移動する場合はAfter引数を指定する :

Worksheetオブジェクト.Move After

下記のサンプルコードは、アクティブなブックの1枚目のワークシートを3枚目の手前(左側)に、
5枚目のワークシートを8枚目の後ろ(右側)に移動するものである :

Sub SampleMoveWorksheet()
     Dim ws1 As Worksheet
     Dim ws5 As Worksheet
     Set ws1 = Application.ActiveWorkbook.Worksheets(1)
     ws1.Move Before:=Application.ActiveWorkbook.Worksheet(3)
     Set ws5 = Application.ActiveWorkbook.Worksheets(5)
     ws5.Move After:=Application.ActiveWorkbook.Worksheet(8)
End Sub