Check Folder For Files
Hi Guys,
I'd like to do the following in a macro:
Sub MACRO()
MsgBox ("Select the Folder")
Set foldername1 = Application.FileDialog(msoFileDialogFolderPicker)
foldername1.Show
foldername1path = CurDir()
'HELP HERE
End Sub
I want to then check the folder for files:
file1.xls
file245.xls
file278.xls
file88.xls
etc.
so they'll be something like foldername1path & "\" file1.xls (AM I RIGHT?)
If one or more of these files do not exist, I would like a MsbBox to show
with something like "File1.xls and File88.xls not found".
Thanks in advance
Dave
|