# Convert number to words in excel

arunraaj 2 Posts Thursday February 15, 2018Registration date February 16, 2018 Last seen - Feb 15, 2018 at 03:39 AM - Latest reply: TrowaD 2308 Posts Sunday September 12, 2010Registration dateModeratorStatus March 15, 2018 Last seen - Feb 22, 2018 at 11:04 AM
Hello,

how to convert numbers to words in excel like 113 as one one three.
See more

## 3 replies

TrowaD 2308 Posts Sunday September 12, 2010Registration dateModeratorStatus March 15, 2018 Last seen -
0
1
Hi Arunraaj,

https://support.microsoft.com/nl-nl/help/213360/how-to-convert-a-numeric-value-into-english-words-in-excel

Best regards,
Trowa
arunraaj 2 Posts Thursday February 15, 2018Registration date February 16, 2018 Last seen - Feb 16, 2018 at 12:21 AM
i don't want above type answer, i want, like "112" then "one one two", "450" then "four five zero".
TrowaD 2308 Posts Sunday September 12, 2010Registration dateModeratorStatus March 15, 2018 Last seen -
0
Hi Arunraaj,

Well, it was suppose to guide you.

Here is a modified version:
```Function NumbersToWord(ByVal MyNumber)
Dim x As Integer
Dim Result As String

For x = 1 To Len(MyNumber)
Result = Result & GetDigit(Mid(MyNumber, x, 1)) & " "
Next x

NumbersToWord = Result
End Function

Function GetDigit(Digit)
Select Case Val(Digit)
Case 0: GetDigit = "Zero"
Case 1: GetDigit = "One"
Case 2: GetDigit = "Two"
Case 3: GetDigit = "Three"
Case 4: GetDigit = "Four"
Case 5: GetDigit = "Five"
Case 6: GetDigit = "Six"
Case 7: GetDigit = "Seven"
Case 8: GetDigit = "Eight"
Case 9: GetDigit = "Nine"
End Select
End Function
```

Best regards,
Trowa