Macro to find file path of specific file.

[MrKrich]

Can anybody please tell me how to write the macro that
find the file path of file such as word.txt or
notepad.exe in the computer?

 

[dz]

Found this code in the VBA help index and then tweaked it
a bit for your needs. So, instead of MsgBox, create a
string variable and capture the path. However, it can be
quite slow if you don't give it at least a starting
directory (i.e., c:\winnt). Hope this helps.

DZ

With Application.FileSearch
.NewSearch
.LookIn = "C:\"
.SearchSubFolders = True
.FileName = "notepad.exe"
.MatchTextExactly = False
.FileType = msoFileTypeAllFiles
.Execute
For i = 1 To .FoundFiles.Count
MsgBox .FoundFiles(i)
Next i
End With