ワークシートを移動する

今回はワークシートの移動についてメモしておきます。

ワークシートの移動にはWorksheet.Moveメソッドを使います。

シートを先頭に移動

実行プログラム

Sub Sample6_9_1()

    Worksheets("C").Move before:=Worksheets(1)  ' 先頭に移動

End Sub

Sub Sample6_9_1()

Worksheets("C").Move before:=Worksheets(1) ' 先頭に移動

End Sub

実行前

実行後

実行プログラム

Sub Sample6_9_2()

    Worksheets("C").Move before:=Worksheets("B")  ' "B"の前に移動

End Sub

Sub Sample6_9_2()

Worksheets("C").Move before:=Worksheets("B") ' "B"の前に移動

End Sub

実行前

実行後

実行プログラム

Sub Sample6_9_3()

    Worksheets("A").Move After:=Worksheets("B")  ' "B"の後に移動

End Sub

Sub Sample6_9_3()

Worksheets("A").Move After:=Worksheets("B") ' "B"の後に移動

End Sub

実行前

実行後

実行プログラム

Sub Sample6_9_4()

    Worksheets("A").Move After:=Worksheets(Worksheets.Count)  ' 最後に移動

End Sub

Sub Sample6_9_4()

Worksheets("A").Move After:=Worksheets(Worksheets.Count) ' 最後に移動

End Sub

実行前

実行後