No question here, just a custom function for the archive


Return an ordinal number (e.g., 1st, 2nd, 3rd) from a cardinal number
(e.g., 1, 2, 3, etc).


Function OrdinalNumberReturn(TargetCell As String) As String
'return ordinal number (e.g. 1st,2nd,3rd) from a cardinal number
'(e.g.,1,2,3,etc).

If TargetCell = "" Then
OrdinalNumberReturn = ""
Else

Select Case Right(TargetCell, 1)

Case 1
OrdinalNumberReturn = TargetCell & "st"
Case 2
OrdinalNumberReturn = TargetCell & "nd"
Case 3
OrdinalNumberReturn = TargetCell & "rd"
Case Else
OrdinalNumberReturn = TargetCell & "th"
End Select
End If
End Function


search criteria
return ordinal number from a cardinal number
convert to ordinal number ordinal conversion
get the ordinal number evaluate for ordinal number