怎样用VBA根据姓名,提取以"姓名"为文件名的某工作表数据?

我有件工作,需要在数据表中输入人名后,点"提取"按钮,自动把相应的数据提取出来放在数据表中.因为任务比较重(1000多人),一个个复制粘贴太麻烦,所以就想到了VBA,但我又不会,所以到这里来请教高手们了.具体说明在附件中,请高手们一定要帮忙啊,否则我就麻烦大了.我在这里先谢谢了!