Saving file with date variable

[Steel Monkey]

Hi All

Hopefully just a quick question :

I am trying to save a file as a .csv. See below code:

Code:
--------------------
fileSaveName = Application.GetSaveAsFilename("C:\Documents and Settings\My Documents\Testing\excel\" & empinput, fileFilter:="CSV Files (*.csv), *.csv")
--------------------


empinput is a variable which works fine, at the end of the filename
though i need the current month inserted in mm format

i.e. 22208 'if empinput = 222
can anyone help me with this ??

Thanks in advance!!

 

[Steel Monkey]

Problem solved. In case any one is wondering here i got the current
month as something i could use.


Code:
--------------------
Dim mystr
mystr = Format(Date, "mm")
--------------------


then just used this:

Code: