Question

如何将多个EXCEL表格中第一行的数据统一提取到另一个表格中？

Answer 1

如下参考：

1.在接下来的页面中，我们现在需要从单元格A2到A10中提取重复的数据，并将它们放在单元格E2到E10中。

2.然后用鼠标选择从E2到E10的所有内容。

3.然后在编辑字段中输入公式:=IF(COUNTIF($A$2:A2,A2)>1,A2，"")。

4.再次按CTRL+enter得到从E2到E10cell的结果，并将从A2到A10cell的重复数据提取到从E2到E10cell的对应cell。

Answer 2

将多个EXCEL表格中第一行的数据统一提取到另一个表格中的步骤为：

1、在汇总表中的A列，将多个工作表的表名依次排列；

2、在B1单元格输入以下公式，然后向右向下填充公式

=OFFSET(INDIRECT($A1&"!A1"),,COLUMN(A1)-1)&""

公式表示：以A1单元格的内容作为表名引用，通过OFFSET函数将表名引用的A1单元格作为基准单元格，每向右移动一列，基准单元格向右偏移一列。从而得到A列表名工作表的所有首行数据。如果数据为空，就返回空值。

Answer 3

Sub shishi()
Workbooks.Open (ActiveWorkbook.Path & "\b.xlsx")
For a = 1 To Sheets.Count
Workbooks("b.xlsx").Sheets(a).Rows(1).Copy
Workbooks("a.xlsx").Sheets(1).Range("a" & a).PasteSpecial
Next
End Sub
'这是把b的数据复制到a表。

追问

我还没有接触过这个宏 能帮我编辑个 顺便教教我么

Answer 4

两种方式，一种写宏，另一种复制粘贴。

追问

我还没有接触过这个宏 能帮我编辑个 顺便教教我么

Answer 5

复制，选择性黏贴，ok