Visual Basic For Applications Tips

ワークシートの移動

ブックを指定したい場合は、Workbooks("ブック名").Sheets〜
アクティブなブックを指定したい場合は、ActiveWorkBook.Sheets〜
プロシジャが格納されているブックを指定したい場合、はThisWorkBook.Sheets〜

'Sheet2を既存シートの先頭へ移動
Sub SheetMove1()
　　Sheets("Sheet2").Move before:=Sheets(1)
End Sub

'Sheet2を既存シートの末尾へ移動
Sub SheetMove2()
　　Sheets("Sheet2").Move after:=Sheets(Sheets.Count)
End Sub