You can use this macro:

Dim str As String
str = "C:\Mybackup\Price" & Format(Date, "mmddyy")
MkDir (str)


"dan" wrote:

I want to backup folder "C:\Documents and Settings\dan\Price" as
"C:\MyBackup\PriceMMDDYY"
Could you help me script a Macro to do this.
Thanks