
多个excel关联数据,有很多个表格,现在做一个汇总表,想把sheet1里的A1,和C1放到sheet4里的A1,和B1
有很多个表格,现在做一个汇总表,想把sheet1里的A1,和C1放到sheet4里的A1,和B1,sheet2里的A1,和C1放到sheet4里的C1,和D1,sheet...
有很多个表格,现在做一个汇总表,想把sheet1里的A1,和C1放到sheet4里的A1,和B1,sheet2里的A1,和C1放到sheet4里的C1,和D1,sheet3的A1,和C1放到sheet4里的E1和F1,同理想要在sheet4里的A1输入什么公式,然后拖动,就可以不必一个个关联sheet4里A1,B1,C1,D1,E1,F1,因为很多个表,一个个的去设置sheet4里的表格很麻烦,谢谢,分还可以追加,谢谢
展开
5个回答
展开全部
sheet4 A1输入公式如下
=INDIRECT("sheet"&INT(COLUMN(B1)/2)&"!"&(ADDRESS(ROW(A1),IF(MOD(COLUMN(A1),2)=0,3,1)))) 右拉复制公式至F列,再下拉复制公式
=INDIRECT("sheet"&INT(COLUMN(B1)/2)&"!"&(ADDRESS(ROW(A1),IF(MOD(COLUMN(A1),2)=0,3,1)))) 右拉复制公式至F列,再下拉复制公式
展开全部
Sub 链接()
Dim i As Integer
Dim n As Integer
n = Worksheets.Count - 1
For i = 1 To n
Cells(1, 2 * i - 1) = "=" & Worksheets(i).Name & "!A1"
Cells(1, 2 * i) = "=" & Worksheets(i).Name & "!C1"
Next
End Sub
在你汇总表运行这个代码
Dim i As Integer
Dim n As Integer
n = Worksheets.Count - 1
For i = 1 To n
Cells(1, 2 * i - 1) = "=" & Worksheets(i).Name & "!A1"
Cells(1, 2 * i) = "=" & Worksheets(i).Name & "!C1"
Next
End Sub
在你汇总表运行这个代码
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
如果想自己看帮助,请使用关键字“引用”,因为可能不只一种解决方案。
如果不想看,简单方案如下:
1。sheet4-A列对应sheet1-A列:在sheet4-A1中输入“=sheet1!A1”
sheet4-B列对应sheet1-C列:在sheet4-B1中输入“=sheet1!C1”
sheet4-C列对应sheet2-A列:在sheet4-C1中输入“=sheet2!A1”
sheet4-D列对应sheet2-C列:在sheet4-D1中输入“=sheet2!C1”
。。。
2。第一行公式写完,全选第一行后直接向下拖拽即可,公式会自动向下累计变化
如果不想看,简单方案如下:
1。sheet4-A列对应sheet1-A列:在sheet4-A1中输入“=sheet1!A1”
sheet4-B列对应sheet1-C列:在sheet4-B1中输入“=sheet1!C1”
sheet4-C列对应sheet2-A列:在sheet4-C1中输入“=sheet2!A1”
sheet4-D列对应sheet2-C列:在sheet4-D1中输入“=sheet2!C1”
。。。
2。第一行公式写完,全选第一行后直接向下拖拽即可,公式会自动向下累计变化
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
把你多个工作表的格式和汇总表要求取的值描述清楚,不要老想着合并成一个汇总表来取数,如果可的的话把表格发至tanwen1109@163.com
要求写清楚,看看能不能帮你做好.
要求写清楚,看看能不能帮你做好.
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
不需要VBA的,直接一个等号,拖一下
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询