Question

在一个文件中对所有EXCEL，大概有上千个工作簿，执行同样的录制宏并保存。

我是用来算产品的成本的，将近有上千个工作簿的材料清单，我现在有张价格表，想把这个价格VLOOKUP到其他工作簿上去，=VLOOKUP(B8,[材料价格.xlsx]价格资料库更新!$A$2:$D$11412,4,0)，材料清单格式都是一样的，每个工作簿只有一个工作表。
最后想把这些工作表中B3:B5单元格数据取出来。可能有些地方没有表达清楚，请大侠帮忙

Answer 1

由于你没有具体的单元对应要求，我给出批量打开的框架给你，如果你不会用宏或者不知道怎么写每页要做的代码，可以HI我。

Sub 批量打开()

MyPath = "D:\Excel Programe\ABCD\" '换为你自己保存EXCEL的文件夹
myfile = Dir(MyPath & "*.xls")
Do While myfile <> "" And ActiveWorkbook.Name <> myfile
Workbooks.Open Filename:=MyPath & myfile

每页要做的代码

ActiveWorkbook.Saved = True
ActiveWorkbook.Close '(SaveChanges)
myfile = Dir
Loop

End Sub

追问

我先试试

Answer 2

把这个宏保存在模板里，不能保存在工作表里。

追问

大哥，您有邮箱吗？我发个表格给你
我把要求都写好
您帮我看看，有没有快捷的方法，感激不尽

Answer 3

如果有上千个工作表，先把工作表合并起来再VLOOKUP，这样可行么？

Answer 4

这要用VBA来实现。

追问

我是初学者
还不会编写VBA
现在只能先学先用了。只怪公司系统太差劲了，投入1000多W，这点数据都。。。

Answer 5

能不能说的清楚点