关于#vba#的问题，如何解决？(关键词-批量复制粘贴)

Question

如何用vba实现跨工作簿批量复制粘贴（选择工作簿a的某一个工作表的指定区域去复制粘贴到另一份工作簿b的某工作表的某区域）
刚学习的，一直不太懂，想问问大家，或者有没有相关的这类功能工具呢，有很多工作簿需要批量操作

Answer 1

vba貌似可以，我对vba也是刚了解，认为它能做很多事情，可以帮你尝试下，已经实现，自己打开宏编辑下换路径

Sub Test()
    Dim sourcePath As String
    Dim destinationPath As String
    Dim sourceWorkbook As Workbook
    Dim destinationWorkbook As Workbook
    Dim sourceWorksheet As Worksheet
    Dim destinationWorksheet As Worksheet
    Dim sourceRange As Range
    Dim destinationRange As Range
    
    sourcePath = "C:\Users\Microsoft\Desktop\4.XLSX"
    destinationPath = "C:\Users\Microsoft\Desktop\3.XLSX"
    
    Set sourceWorkbook = Workbooks.Open(sourcePath)
    Set destinationWorkbook = Workbooks.Open(destinationPath)
 
    Set sourceWorksheet = sourceWorkbook.Worksheets(1) 
    Set destinationWorksheet = destinationWorkbook.Worksheets(1) 

    Set sourceRange = sourceWorksheet.Range("A1:B3") 
    Set destinationRange = destinationWorksheet.Range("A3:B5") 
    
    sourceRange.Copy destinationRange
    
    sourceWorkbook.Close SaveChanges:=False
    destinationWorkbook.Close SaveChanges:=True
End Sub