请问如何调用不同工作表中同一位置的数据？

18804

收藏 2009-08-01

各位大侠好。
小弟最近使用仪器的时候得到一些数据，但是处理数据的时候碰到难题。
仪器产生的一系列数据是在同一个文件不同工作表，B4的位置上。
具体如下：
第一个工作表名为：Raw Data{Wavelength-200.0}
第二个工作表名为：Raw Data{Wavelength-220.0}
第三个工作表名为：Raw Data{Wavelength-240.0}
第四个工作表名为：Raw Data{Wavelength-260.0}
……
第四十一个工作表名为：Raw Data{Wavelength-1000.0}
（每个工作表名只是wavelength不一样）
我现在想将所有数据放置到同一个工作表中。A列为wavelength值（即200，220，240，260……，还有一些数据是201，202，203，204……等等）。B列为原来所对应的数据。
不知道我说明白了没有，贴上附件。
请大家帮忙。
祝好。

附件列表

全波长扫描.rar

大小:2.89 KB

马上下载

本附件包括：

全波长扫描.xls

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

全部回复

controlpane1

2009-8-1 16:04:38

Sub a()
For i = 1 To 41
Sheets(42).Range("A" & i + 1) = WorksheetFunction.Substitute(WorksheetFunction.Substitute(Sheets(i).Range("A1").Value, "Raw Data{Wavelength:", ""), "}", "")
Sheets(42).Range("B" & i + 1) = Sheets(i).Range("B4").Value
Next
End Sub

附件列表

全波长扫描.xls

大小:155.5 KB

马上下载

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

sxzh11

2009-8-12 21:06:04

excel home 论坛上有一个公式可以解决，我把他贴到这里，希望对你有用，如果你是将同一工作薄中的多个工作表的同一列复制到另一工作表的不同列,只要你的多个工作表的名字有一定规律(如SHEET1、SHEET2、SHEET3等），就可以用一个公式搞定：
比如你要将SHEET1、SHEET2、……SHEET20共20个工作表的A列数据复制到SHEET21工作表的A至T列，只要在SHEET21工作表的A1单元格输入公式：
=INDIRECT("SHEET"&COLUMN()&"!$A"&ROW())
然后将公式向右并向下复制到相应范围就好了。

如果要复制20个工作表的C列，将公式中的"$F"改为"$C"就可以了