It is correct to have
Option Compare Database
Option Explicit
yes
just wondering why i would get sub r function
because you have not provided the parameters
Code:
dim f as string
dim s a string
s=InputBox("Paste Number Here ?")
f=findXLfile( "T:\DMT Ltd\XL Files", s)
if f="" then MsgBox "Your Search Is NOT On Any XL Files" else MsgBox s & " Is On File Name: " & f
note if you are looking for numbers - they will not be a string so the sql needs to be modified slightly to cater for both numbers and string - suggest try
WHERE cstr(D)='" & phrase & "'