求高手指点 在多个excel 文件里提取特定位置的数据放到1个excel 表格里

Question

求高手指点 在多个excel 文件里提取特定位置的数据放到1个excel 表格里

在好多excel表格里 提取特定位置的数据 按顺序放到1个空白表格里 在每个excel表格里提取的数据为一行 大概就是 名字 地点 数量 希望大家能帮帮 急用 我的 信箱是liukun_chk@163.com 要是有高手给做个批处理就太好了 小弟感恩不禁啊

Answer 1

工具-宏-vb编辑器-插入-模块（然后将下列代码复制进去）-运行（f5）

Sub Macro1()
'
' Macro1 Macro
' 宏由 User 录制，时间: 2008-12-27
'

'
MyPath = ActiveWorkbook.Path
MyName = Dir(MyPath & "\" & "*.xls")
i = 0
Do While MyName <> ""
If MyName <> ActiveWorkbook.Name Then
Set Wb = Workbooks.Open(MyPath & "\" & MyName)
i = i + 1
With Workbooks(1).ActiveSheet
.Cells(.Range("A65536").End(xlUp).Row + 2, 1) = MyName
Wb.Sheets(1).UsedRange.Copy .Cells(.Range("A65536").End(xlUp).Row + 1, 1)
Wbn = Wbn & Chr(13) & Wb.Name
Wb.Close False
End With
End If
MyName = Dir
Loop
End Sub

Answer 2

你留信箱有啥用？
做个单元格引用的模板就好了