ワークシートを移動するマクロ

同一ブック内でワークシートの位置を任意の場所に移動します。

このマクロでは、”Sheet1″をワークシートの２枚目に移動します。

移動の操作は、手動で「ドラッグ＆ドロップ」で行うこともできます。

ワークシートを移動するマクロ

Sheets(“シート名”).Moveメソッド

Sub サンプル4040()
 
    Sheets("Sheet4").Move After:=Sheets(2)
  
End Sub

Sheets("Sheet4").Move After:=Sheets(2)

ワークシート”Sheet4″を左から２番めにあるワークシート”Sheet3″の後ろに移動します。

●マクロの実行前の画像

●マクロの実行結果
２番めのシート”Sheet3″の後ろに移動します。

シート名を指定して移動する

Sub サンプル4045()
 
    Sheets("Sheet3").Move Before:=Worksheets("Sheet1")
  
End Sub

Sheets("Sheet3").Move Before:=Worksheets("Sheet1")

ワークシート”Sheet3″をワークシート”Sheet1″の前に移動します。

●マクロの実行前の画像

●マクロの実行結果
２番めのシート”Sheet3″の後ろに移動します。

以上で「ワークシートを移動するマクロ」の説明を終わります。