如何从多个excel文件中提取固定单元格的数据，并构建一个新的excel表

'关闭所有excel文档，新建一个工作薄 '运行下面的宏 Sub hebin() Dim fs, f, f1, fc, s Set fs = CreateObject("Scripting.FileSystemObject") Dim fd As FileDialog Set fd = Application.FileDialog(msoFileDialogFolderPicker) fd.Show