hello

I've got one problem.. I backup some files in excel and I want them to
be in different directories:

if its may 2007
then the file is saved:
C:\backup\2007\may\*.txt

I can write them in chosen directories but I want it to be automatic:
DatePart("yyyy", Date)
and if yyyy = 2007 macro is choosing c:\backup\2007

any help would be helpfull!!
thx

With ActiveWorkbook
.SaveAs "C:\backup\" & DatePart("yyyy", Date) & "\" & .name"
End With


--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"bratek" wrote in message
ups.com...
hello

I've got one problem.. I backup some files in excel and I want them to
be in different directories:

if its may 2007
then the file is saved:
C:\backup\2007\may\*.txt

I can write them in chosen directories but I want it to be automatic:
DatePart("yyyy", Date)
and if yyyy = 2007 macro is choosing c:\backup\2007

any help would be helpfull!!
thx

Hi bratek

You can creat the save path like this

MsgBox "C:\backup\" & Format(Date, "yyyy") & "\" & Format(Date, "mmm") & "\"


--
Regards Ron de Bruin
http://www.rondebruin.nl



"bratek" wrote in message ups.com...
hello

I've got one problem.. I backup some files in excel and I want them to
be in different directories:

if its may 2007
then the file is saved:
C:\backup\2007\may\*.txt

I can write them in chosen directories but I want it to be automatic:
DatePart("yyyy", Date)
and if yyyy = 2007 macro is choosing c:\backup\2007

any help would be helpfull!!
thx

thx!!! works perfectly!! maybe except the second option "mmm" I used
"m" and it works :)