open a file in VB that the date changes every day.

[Guest]

What if the file name is always preceeded by the date. How did I get a macro
to open up a file that is named the same all the time, but has the date at
the end always change?

 

[Mike Fogleman]

Which is it?

What if the file name is always preceeded by the date. DateFilename
but has the date at the end always change?

FilenameDate

Either way the filename would be like this for today's date:

Sub test()
Dim MyDate As String
Dim MyFile As String

MyDate = Format(Date, "mm_dd_yy")
MyFile = "SomeFile " & MyDate & ".xls" '= "SomeFile 10_05_05.xls"
'or
MyFile = MyDate & " SomeFile.xls" '= "10_05_05 SomeFile.xls"
End Sub

Mike F

 

[Guest]

I'm still having issues and it is beyond me. Where is what I did..

'Defining today

Dim Today As String
Today = Format(Date, "mm-dd-yy")

'Opening file NI WA Subinventory Trasactions " & Today &".xls Current file
is saved
' as " NI WA Subinventory Trasactions 10-24-05

Windows("NI WA Subinventory Transactions " & Today & ".xls").Activate

I am getting the error measage "Subscript out of Range."

What am I doing wrong?

--
Regards,
Michael

Which is it?

What if the file name is always preceeded by the date. DateFilename
but has the date at the end always change?

FilenameDate

Either way the filename would be like this for today's date:

Sub test()
Dim MyDate As String
Dim MyFile As String

MyDate = Format(Date, "mm_dd_yy")
MyFile = "SomeFile " & MyDate & ".xls" '= "SomeFile 10_05_05.xls"
'or
MyFile = MyDate & " SomeFile.xls" '= "10_05_05 SomeFile.xls"
End Sub

Mike F

 

[Guest]

I got it. I was not passing the string "Today" into the function..
Duhhhhhh... Thanks for all your help.....