如何用宏提取同一个文件夹中大批量不同Excel表中的同一行数...

所谓求人不如求已

LZ自己录制一个宏，包括打开文件，提取数据，复制粘贴，研究下代码就可以了。

自己写的话就要创建对象，

到ExcelHOme 去看下吧，这类代码很多

需求如此的简单，录一个宏，把文件名设为变量，套个循环就好了
1，程序为：
Sub 提取第二知行()
Dim wks As Worksheet, sht As Worksheet
On Error Resume Next
Set wks = Worksheets("汇总表")
If Err <> 0 Then Worksheets.Add(before:=Sheets(1)).Name = "汇总表"
For Each sht In Sheets
If sht.Name <> "汇总表" Then
sht.Range("A2").EntireRow.Copy Sheets("汇总表").Range("A" & Sheets("汇总表").Cells(Rows.Count, 1).End(xlUp).Row + 1)
End If
Next
End Sub
2，如果没有汇总表则新道建汇总表。将非汇总表的回其他表里面的第答二行分别复制并粘贴进汇总表，粘贴位置为A列的第一个空白行。

从同一个工作簿不同的sheet抽取数据
从另一个工作簿的sheet抽取数据
这是两种情况，不要混了。你是哪种？
宏可以实现。