Date in Output Excel File Name (1 Viewer)

[gmatriix]

Hello All,

I am trying to put the date in the file name. I am outputting a table to an excel file and trying to put the date before the file name.

What i was working with so far......sorry relatively new to this

Function testthisone()
Dim FilTim As String
Dim FilNam As String
Dim OutNam As String

FilTim = Date
FilNam = "C:\Users\userc\Desktop\TestAutoqry\HelloTest.xls"


    DoCmd.OutputTo acOutputTable, "RTest MCR", "Excel97-Excel2003Workbook(*.xls)", FilNam, False, "", , acExportQualityPrint

End Function

Any Ideas?

 

[CJ_London]

try

FilNam = "C:\Users\userc\Desktop\TestAutoqry\HelloTest " & format(date(),"yyyy-mm-dd") & ".xls"

 

[arnelgp]

Function testthisone()
Dim FilTim As String
Dim FilNam As String
Dim OutNam As String
Dim path as string
Dim ext as string


FilTim = Format(Date(), "\_yyyy-mm-dd")
FilNam = "HelloTest"
path="C:\Users\userc\Desktop\TestAutoqry"
ext=".xls"


DoCmd.OutputTo acOutputTable, "RTest MCR", "Excel97-Excel2003Workbook(*.xls)", path & FilNam & FilTim & ext, False, "", , acExportQualityPrint

End Function

 

[gmatriix]

Thanks alot guys....nice to awesome people willing to help!!