Excel宏可读取文件夹中的多个文件并在其中进行搜索

时间:2018-01-09 09:19:16

标签: vba excel-vba excel

我有一些相同标题行的excel工作簿。我需要在所有这些工作簿中的特定列中进行搜索,并在相应的列中执行countif类功能(与第一列不同) 例如..列A具有框的名称,B具有关于每个框中的内容的信息。我想在文件夹中搜索多个excel并获取独特的框名称及其内容计数的报告。方框A有5个苹果,2个橙子,1个芒果。

我希望这个要求足够清楚。任何人都可以帮我使用基础axcel宏代码吗?

1 个答案:

答案 0 :(得分:1)

谈论工作簿,你在一个文件夹中有不同的文件(* .xls)?然后你可以从这样的事情开始:

Dim Path As Integer
Path = "Type in the path with your workbooks"

File = Dir$(Path & "\*.xls")
Do While File <> ""
    'Do stuff like:
    'opening your workbook and search for the names of the boxes
    'save your needed informations in a variable or array
    'close the workbook
    File = Dir$()
Loop

或者您的意思是您有一个包含更多工作表的工作簿(一个文件)?然后做这样的事情:

Dim i
For i = 1 To ThisWorkbook.Worksheets.Count
    'Do your stuff here
Next i

如果您想获得更好的帮助,请发布一些具有特定问题的代码