如何提取多个excel工作表中同一位置的单元格数据？
2个回答
展开全部
插入工作表
在A1中输入或复制粘贴下列公式
=INDIRECT("sheet"&ROW(A1)&"!A1")
下拉填充
分别得到SHEET1到SHEETn工作表中A1单元格的值
在A1中输入或复制粘贴下列公式
=INDIRECT("sheet"&ROW(A1)&"!A1")
下拉填充
分别得到SHEET1到SHEETn工作表中A1单元格的值
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
1、如果sheet名称具备一定规律，例如常见的sheet1,sheet2,sheet3…
等可采用如下公式，向下拖拽即可。
=INDIRECT("sheet"&ROW(A1)&"!A1")
也可通过类似单元格区域排列方式进行相关运算，例如如下公式对sheet1到sheet4的单元格A1求和。
=sum('Sheet1:Sheet4'!A1)
2、VBA方法
如果毫无规律，则可使用VBA进行操作，如下代码指代排列在第一个sheet
A1单元格的数值。
Worksheets(1).cells(1,1)如下代码将各sheet
A1单元格内容复制到当前sheet
B列。
Sub Data_()
Dim i As Single
For i = 1 To Worksheets.Count
Cells(i, 2) = Worksheets(i).Cells(1, 1)
Next
End Sub
等可采用如下公式，向下拖拽即可。
=INDIRECT("sheet"&ROW(A1)&"!A1")
也可通过类似单元格区域排列方式进行相关运算，例如如下公式对sheet1到sheet4的单元格A1求和。
=sum('Sheet1:Sheet4'!A1)
2、VBA方法
如果毫无规律，则可使用VBA进行操作，如下代码指代排列在第一个sheet
A1单元格的数值。
Worksheets(1).cells(1,1)如下代码将各sheet
A1单元格内容复制到当前sheet
B列。
Sub Data_()
Dim i As Single
For i = 1 To Worksheets.Count
Cells(i, 2) = Worksheets(i).Cells(1, 1)
Next
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
