Hi
I have this:

Dim Fname As Variant
Fname = Application.GetSaveAsFilename("c:\MESSER\" & Range("mesnum").Value &
Range("MONTH").Value & ".csv")

If Fname = False Then
MsgBox "You didn't select a file"
Exit Sub
End If
--------------------
The Range("MONTH") has 31/07/2006
How can I trim this to 310706 in the Fname = statement above?
Thanks
Helmut