Opening newest file

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Hi All,

I am trying to write a macro that opens the newest file in a directory,
currently the files name contains the date in YYYYMMDD format and is run on a
weekly basis

Thanks
 
Assuming you know the year and month, maybe you could start with something
like this:

FileName = Dir$("200410*.XLS")
LastFile = ""
Do While Len(FileName) > 0
If FileName > LastFile Then
LastFile = FileName
End If
FileName = Dir$()
Loop

Or, if the files are written on the same day of the week, you should be able
to construct a list of the possible dates. If you create that list in
descending order, you can look for the files with the Dir$ command until you
find one. Assuming they are written on the 28th, 21st, 14th, and 7th

D = DateSerial(2004,10,28)
Do
If Len(Dir$(Format$(D, "yyyymmdd") & ".XLS")) Then Exit Do
D = D - 7
Loop

FileName = Format$(D, "yyyymmdd") & ".XLS"
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Finding Newest File 1
find newest file in all sub folders 1
Fiind the newest file 5
find latest date modified file 1
Macro to filter on most current date. 5
Save Macro with date in name 1
How can macro open daily generated files? 5
Using macros to open newest file in a directory 3

Back
Top