try
Sub formatit()
' "Tuesday, November, 25, 2003".
Selection = Format(Selection, "dddd dd,yyyy")
End Sub


--
Don Guillett
SalesAid Software

"Eric" wrote in message
...
Hi there,

Can anyone help me please on how to create a date format
in this sample format, I want to write in macro that
automatically substitute them in my reports.

I want this format: "Tuesday, November, 25, 2003".

Can anybody help me please.

TIA
Eric