あるワークブックから新しいワークブックに特定の範囲のセルをコピーするマクロを探しています。マクロは、A1:HC5
からセルをコピー"Workbook1"
し、の同じセル(A1:HC5)
に貼り付け"Workbook2"
ます。ガイダンスをありがとう!
6840 次
1 に答える
1
これは機能するはずです:
Sub test()
Dim wbk As Workbook
strFirstFile = "C:\source.xls"
strSecondFile = "C:\destination.xls"
Range("A1:HC35").Copy
Set wbk = Workbooks.Open(strSecondFile)
With wbk.Sheets("Sheet1")
Range("A1").PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
End With
End Sub
于 2012-12-21T16:52:08.640 に答える