VBA シートを別ブックの先頭・一番左にコピー

質問

このシート（例Sheet1）を別ブックの先頭・一番左にコピーしたいのです。
下記のコードは一番右にコピーです。
宜しくお願いします。

Sub SheetCopy5()
Dim bk As Workbook
　Set bk = Workbooks("コピー先のブック.xlsx")
　ActiveSheet.Copy _
　　　After:=bk.Sheets(bk.Sheets.Count)
End Sub

回答No.1

kkkkkm · ベストアンサー

ActiveSheet.Copy _
Before:=bk.Sheets(1)

にしてみてください。

お礼

ありがとうございます。