VBA subdirectory search Excel 2007 challenge

Do you want to return just the first found directory for each file? ( there may be more that one occurence of a file in a directory structure maybe )

Yes only the first found instance of that found file. Thanks for the quick reply.

Welcome to MrExcel.

Here is a UDF:


adapted from post #7 at:

http://www.bigresource.com/Tracker/Track-vb-LEh9svy7Ns/

Thanks so much Andrew you gave me the right starting point and it worked brilliantly. I posted the code I tweaked if anybody runs into the same problem.
The output of the following code is: I put file path into Rows A, file names into Rows B, the code puts the path of found files into Row C.

Sub findfile()
Dim tempStr As String, Ret As Long
Dim findfile As String

endrange = Range("b65000").End(xlUp).Row
For i = 1 To endrange
Path = Range("A" & i)
Filename = Range("B" & i)
tempStr = String(MAX_PATH, 0)
If Right(Path, 1) <> "\" Then Path = Path & "\"
Ret = SearchTreeForFile(Path, Filename, tempStr)
If Ret <> 0 Then
findfile = Left$(tempStr, InStr(1, tempStr, Chr$(0)) - 1)
Range("c" & i) = findfile
Else
findfile = "Not found!"
End If
Next i
End Sub

Thanks again for the quick solution.

You can use the function I posted in a formula, eg:

=FindFile(B$1,A1)

in C1 copied down.