提取同一个EXCEL表中多个sheet中内容？

我想提取同一个EXCEL表中多个sheet中（sheet1到sheet400）某一位置的内容(比如说C5)到新的sheet中成为一列。这个用VBA怎么实现呢。

推荐答案 2020-12-16

æ°å»ºä¸ä¸ªSheetï¼å¤å¶ä»£ç ï¼

sub é±¼æ¨æ··çª()
for each sh in sheets
if sh.name<>activesheet.name then
i=i+1

range("A"&i)=sh.range("c5")
end if
next

end sub
é»åçä»£ç ï¼æ²¡æè°è¯ï¼æé®é¢å¯ä»¥åèç³»æï¼æ¥èªï¼æ±å©å¾å°çåç

温馨提示：答案为网友推荐，仅供参考

当前网址：http://99.wendadaohang.com/zd/7veezOvOOOW7WB77Bv.html

其他回答

第1个回答 2020-12-14

输入以下公式，然后向下填充公式至第400行
=INDIRECT("Sheet"&ROW(A1)&"!C5")
得到同一个EXCEL表中sheet1到sheet400的C5的数据。本回答被网友采纳

相似回答

如何一次性打印excel表格的多个工作表?答：1. 首先打开电脑上的Excel表格，如图，我们需要打印sheet1、sheet2、sheet3三个工作表的内容；2. 首先将sheet1选中，按键盘上的CTRL 键后，依次点击sheet2、sheet3，将三个工作表全部选中；3. 点击页面上方的打印预览图标；4. 进入打印预览界面，这是sheet1打印界面；5. 如图，在左下角通过切换页码...

EXCEL中如何提取多个工作表中的数据答：1、首先选中Excel表格，双击打开。2、然后在该界面中，选中“方方格子”里“工作表”里“汇总拆分”按钮。3、再者在该界面中，选中“汇总大师”选项。4、之后在该界面中，点击左侧“多簿汇总到一表”选项。5、接着在该界面中，点击“开始”按钮。6、其次在该界面中，点击右侧的“添加文件”按钮。7...

怎样提取EXCEL表中多个SHEET中某列最后一个数据?答：有三个工作表：表1、表2、表3，并有一个目录。在目录中把3个工作表中各自的最后一行数据提取到目录对应的工作表中，不知是否与题主的工作簿有些类似。B1=LOOKUP(1,0/(INDIRECT($A2&"!A:A")<>""),INDIRECT($A2&"!A:A"))C1=VLOOKUP(B2,INDIRECT($A2&"!A:B"),2,)一起下拉 ...

提取同一个EXCEL表中多个sheet中内容?答：新建一个Sheet，复制代码：sub 鱼木混猪()for each sh in sheets if sh.name<>activesheet.name then i=i+1 range("A"&i)=sh.range("c5")end if next end sub 默写的代码，没有调试，有问题可以再联系我！

如何把多个Excel工作簿中,同一个工作表同一位置的数据一起提取出来?答：如果是提取多个工作簿的Sheet1的A1单元格的数据。在A列分别输入多个工作簿的名称，然后在B2单元格输入以下公式，并向下填充公式 =INDIRECT("'["&A2&"]Sheet1'!A1")

如何从一个表里面提取另一个表的数据呢?答：excel中在一个表中提取另一个表对应的数据步骤如下：1、双击打开电脑中安装的Excel软件，进入主页面。2、打开表一个表格，这个表格里sheet1和sheet2都有内容。3、我们要做的是在sheet1中在d6单元格中查找销售人员5的销售金额，利用公式进行查找，在d6单元格中单机fx插入函数，弹出插入函数对话框。4...

如何抓出一个excel表多个sheet相同单元格的数据答：第一种方法：如果Sheet名有规律，或者其中一个工作表中有Sheet名清单，可以用INDIRECT函数引用到各Sheet中相同单元格的内容。第二种方法：可以用VBA方法实现，遍历各工作表，分别取出对应单元格的内容。

excel怎么在一个工作表提取多个工作表中的同一位置单元格答：把汇总的表格拖到第一位，后面是sheet1，sheet2，...（象你说的，名字不是这样的）。同时按Alt和 F11 进入宏界面，点菜单的插入，模块，粘贴以下内容：Sub ttt()Sheets(1).Select For i = 2 To ThisWorkbook.Sheets.Count Cells(i,7)= "="& Sheets(i).Name & "!H10"Next i End S...

excel2003的使用,在一个工作薄里有42个工作表,如何提取同一个位置的...答：1、插入一新工作表，在任意单元格输入 =INDIRECT("Sheet"&ROW(A1)&"!A3") 公式向下复制100行。2、同理 =INDIRECT("Sheet"&ROW(A1)&"!D5")，求行标公式：ROW(A1)，求列标公式：COLUMN(A1)。多工作表同位置单元格求和。3、EXCEL中容易被忽略功能(18):多工作表同位置单元格求和。对于一个...

大家正在搜