Hi, I wan to convert my numbers into ordinal numbers like 1st, 2nd, 3rd etc on a form. I know this is very basic question, please dont mind, will be happy if you can help me. I have found a function, but not sure.
I want to call it for specefic control (numbered field) only on my form.
My form has ranking system, but button click record moves up and down, and the Rank / position field (numbered) changes for that row.
Question:
HOW and WHERE to call this function for that specific control which has the numbers (this is numbered field, it is not ID field).
Thanks in advance.
Below is the function
I want to call it for specefic control (numbered field) only on my form.
My form has ranking system, but button click record moves up and down, and the Rank / position field (numbered) changes for that row.
Question:
HOW and WHERE to call this function for that specific control which has the numbers (this is numbered field, it is not ID field).
Thanks in advance.
Below is the function
Code:
Function Addth(pNumber As String) As String
'UpdatebyExtendoffice20160628
Select Case CLng(VBA.Right(pNumber, 1))
Case 1
Addth = pNumber & "st"
Case 2
Addth = pNumber & "nd"
Case 3
Addth = pNumber & "rd"
Case Else
Addth = pNumber & "th"
End Select
Select Case VBA.CLng(VBA.Right(pNumber, 2))
Case 11, 12, 13
Addth = pNumber & "th"
End Select
End Function