tyoshikawa1106のブログ

- Force.com Developer Blog -

VBA:ワークシートのコピー

ワークシートのコピーは次のように行います。

 

アクティブなシートを"Sheet2"の後ろにコピーする

Sub Test()
    ActiveSheet.Copy After:=Worksheets("Sheet2")
End Sub

 

"Sheet1"を"Sheet2"の後ろにコピーする

Sub Test()
    Worksheets("Sheet1").Copy After:=Worksheets("Sheet2")
End Sub

 

現在アクティブなシートを"Sheet2"の前にコピーする

Sub Test()
    ActiveSheet.Copy Before:=Worksheets("Sheet2")
End Sub

 

"Sheet2"を"Sheet1"の前にコピーする

Sub Test()
    Worksheets("Sheet2").Copy Before:=Worksheets("Sheet1")
End Sub