首页 文章

将单元格从一个工作簿复制到另一个工作簿的宏

提问于
浏览 次
-5

我正在寻找一个宏，将一个特定范围的单元格从一个工作簿复制到一个新的工作簿 . 宏将从 "Workbook1" 复制单元格 A1:HC5 ，并粘贴到 "Workbook2" 的相同单元格 (A1:HC5) 中 . 谢谢你的指导！

excel vba excel-vba

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
    回复于

相关问题