在同一单元格和同一工作表中search多个Excel工作簿的值

我正在学习一个新的工作VBA，并分配了一个项目，涉及在大约100个工作簿中检查一个值。 该值包含在100个工作簿中的每个工作簿中具有相同名称的工作表中相同的单元格（I12）中。 是否有可能使用SQL以某种方式将每个工作簿中的单元格的值传递给variables，以便我可以比较它们？ 我目前的代码打开每个工作簿来比较值，这是可行的，但相当耗时。

Answer 1

如果只是一个单元，你可能想尝试ExecuteExcel4Macro ？
就像是：

Sub Test() Dim fexcel Dim fpath As String, fval As String, aval fpath = "C:\Users\User.Name\FolderName\" '~~> change to suit fexcel = Dir(fpath, vbNormal) Do While fexcel <> "" '~~> Sheet1 should be the sheet name, R12C9 is I12 in R1C1 notation fval = "'" & fpath & "[" & fexcel & "]Sheet1'!R12C9" aval = ExecuteExcel4Macro(fval) '~~> Do your comparison here or dump information in an array fexcel = Dir Loop End Sub