Need to test for file presence
This is some code I wrote to check for a file on a disk. If you change the
LookIn directory and the Filename then you can setup any "Then" statement you
want.
Set fs = Application.FileSearch
With fs
.LookIn = "A:\"
.Filename = "GLMISC.txt"
If .Execute 0 Then
"Grant" wrote:
I have a macro that looks for a specfic file in a directory. It opens
the file and then does some other stuff. What I want to do is test to
see if the file is present or not. I think I should use an If Then Else
statement,
but I'm not sure how to test if the file Workbooks.OpenText Filename:=
"pathToFile\pobcinv
is successful.
If Workbooks.OpenText Filename:= "pathToFile\pobcinv" is successfull Then
'Statements
Else
T.I.A.
Grant
|