![]() |
|
|||||||
|
|
Thread Tools | Display Modes |
|
#6
|
||||
|
||||
|
You could add the following function to the same code module you use for Graham's code:
Code:
Function DateOrdinal(Val As Long) As String Dim strOrd As String If (Val Mod 100) < 11 Or (Val Mod 100) > 13 Then strOrd = Choose(Val Mod 10, "st", "nd", "rd") & "" DateOrdinal = IIf(strOrd = "", "th", strOrd) End Function
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
| Thread Tools | |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| How to search for a specific year from a table with year range? | Wii | Excel | 0 | 05-05-2015 12:40 PM |
| How to calculate a rolling year-to-date percentage by quarter as the year progresses | sleake | Excel Programming | 2 | 04-23-2015 11:51 AM |
Need advice on creating new .pst files every year
|
Rockitman31 | Outlook | 1 | 03-02-2013 08:00 AM |
| Creative Ways for a year-to-year comparison??? | ridonkulous5 | Excel | 1 | 03-23-2011 04:49 PM |
| Referencing a Captioned Picture | ComcoDG | Word | 0 | 11-10-2008 04:40 PM |