Question

I want to search a file from the path.

For Example,

Path = "C:\Newfolder\"
file name = *.txt, *.fin

I want to get all the *.txt, *.fin file from the new folder.

Answer 1

Use the Scripting.FileSystemObject.

Call it with GetFolder("C:\Newfolder"), then loop through the files in that folder with the
.Files property and filter them on extensions using the GetExtensionName method.

For example:

Dim fso as Object: Set fso = CreateObject("Scripting.FileSystemObject")
Dim f as Object
For Each f in fso.GetFolder("<folderpath>").Files
   If fso.GetExtensionName(f.Path) = "txt" Then 'or maybe it's .txt, I'm not sure
      ' also test for 'fin'
      '... do stuff
   End If
Next f