多个excel关联数据,有很多个表格,现在做一个汇总表,想把sheet1里的A1,和C1放到sheet4里的A1,和B1




有很多个表格,现在做一个汇总表,想把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里的表格很麻烦,谢谢,分还可以追加,谢谢

sheet4 A1输入公式如下
=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

在你汇总表运行这个代码
如果想自己看帮助,请使用关键字“引用”,因为可能不只一种解决方案。
如果不想看,简单方案如下:
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的,直接一个等号,拖一下


Copyright © 2009-2011 All Rights Reserved.