On 12 Mar, 14:20, Helmut wrote:
I have date in "A1" = 28/02/2008
I want to save worksheet as:

"c:\ToCav0208m.csv"

Dim saveName As String
saveName = "C:\ToCav" & Format(Month(Range("A1").Value), "00") &
Format(Range("A1").Value, "yy") & "m.csv"
ThisWorkbook.SaveAs Filename:= saveName

Above assumes A1 is correctly formatted as a date.

--
Gordon