把许多不同EXCEL工作簿(文件名类似的EXCEL表)中相同位置单元格数据弄到另一张工作薄中?

如题所述

如果是一张工作表里有很多工作簿(sheet1,sheet2,sheet3)这样的,假如是把sheet1,sheet2,的内容移到sheet3里,可以用等号跟踪的方法来做,方法是在sheet3中你想要放数据的单元格内输入“=”,然后在sheet1中你想要数据的单元格里点一下,该单元格会出现虚线框,按回车键就可以了追问

excel的1个工作簿包含255张工作表。新建一个excel文件即新建一个工作簿(一般默含3张工作表) 薄比表大吧,然后我的意思是不同的EXCEL表,好多文件...

追答

目前还不知道什么快捷的方法,只能复制粘贴

温馨提示:答案为网友推荐,仅供参考
第1个回答  2012-09-25
用自动的公式可能达不到你想要的效果。
给你一段代码,不管多少个工作薄,你都可以轻松得到你想要的结果
新建一个工作表,在新的工作表名称点右键,查看代码,然后输入下面代码,然后运行。
Sub ddd()
For i = 1 To Sheets.Count - 1
Cells(i, 1) = Sheets(i).Range("a3")
Next i
End Sub

其中第3行的a3就是你说的相同单元格。
第2个回答  2012-09-25
名为 (取出.xls)的工作表1中得出(1.xls)的所有工作表的a1:a10的内容
Sub 复制()
For i = 1 To Workbooks("1.xls").Sheets.Count
Workbooks("1.xls").Worksheets(i).Range("a1:a10").Copy Workbooks("取出.xls").Worksheets(1).Cells(1, i)
Next
End Sub
ALT+F8是运行宏
第3个回答  2012-09-25
目前我只知道,一张一张的搜索,然后粘贴复制!
第4个回答  2012-09-25
这个有点难哦,用VB做个宏来实现吧~追问

更不会了,有没有可以类似的能借鉴的

第5个回答  2012-09-25
不会
相似回答