質問: vbaの事で教えてください。 ブック間の転記のコードを作りました。
回答: Wb1(ThisWorkbook)は旧型式(Excel97-2003形式、拡張子 .xls)で、アクティブになっているブックは他(Wb2とか)ではないですか。 試しに n = Wb1.Worksheets("注文情報").Cells(Rows.Count, 1).End(xlUp).Row の部分を n = Wb1.Worksheets("注文情報").Cells(Wb1.Worksheets("注文情報").Rows.Count, 1).End(xlUp).Row にしてみてください。