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

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

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?
 
Which is it?
What if the file name is always preceeded by the date. DateFilename
but has the date at the end always change?
Click to expand...
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
 
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


Mike Fogleman said:
Which is it?
What if the file name is always preceeded by the date. DateFilename
but has the date at the end always change?
Click to expand...
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
Click to expand...
 
I got it. I was not passing the string "Today" into the function..
Duhhhhhh... Thanks for all your help.....
 
Back
Top