File Browser Prompt
Dim fName as String, bk as Workbook
Dim rng as Range
fName = Application.GetOpenFileName()
if fName < "False" then
set bk = Workbooks.Open(fName)
End if
set rng = bk.worksheets(1).Cells.Find("ABCD")
if not rng is nothing then
msgbox "ABCD found at " & rng.Address(external:=True)
End if
See the Excel VBA help example for FindNext if you need to find multiple
instances of "ABCD" (as an example).
--
Regards,
Tom Ogilvy
"Aaron" wrote in message
...
Hello All,
I am trying to have a file do some lookups off of another file. My
problem
is, I need the Macro to prompt me with a file browser and look at the file
that I choose and then do the lookups off that file. The format in the
files
will always be the same. Any ideas?
Thanks in advance!
Aaron
|