home | Help!
How can I help you ?

Microsoft Access VBA Date Format 1st 2nd 3rd 4th
VBA create the date format for the st part of 1st


sDate = Format(Date, "dddd dd") & Mid("thstndrdth", (DatePart("d", Date) Mod 10) * 2 + 1, 2) & " " & Format(Date, "mmmm yyyy")

Example - Saturday 21st August 2010

Thanks to Ron Coderre Microsoft Excel MVP for the idea and the Excel code