Information abt EXCEL formula
Querist : Anonymous
I need a formula in EXCEL which converts the Value of Figures into Words Automatically.
Ex : If I enter 25,000/- in should convert into Words Twenty Five Thousand only.
Pls if anybody knows abt it Pls help me!!!!!!
To convert number into words : Follow below steps
1. Press Alt+F11
2. Click insert on menu bar > Module Insert
3. Copy & paste in module the following code
Function words(fig, Optional point = "Point") As String
Dim digit(14) As Integer
alpha = Array("", "One", "Two", "Three", "Four", "Five", "Six", "Seven", "Eight", "Nine", "Ten", "Eleven", "Twelve", "Thirteen", "Fourteen", "Fifteen", "Sixteen", "Seventeen", "Eighteen", "Nineteen", "Twenty", "Thirty", "Forty", "Fifty", "Sixty", "Seventy", "Eighty", "Ninety")
figi = Trim(StrReverse(Str(Int(Abs(fig)))))
For i = 1 To Len(figi)
digit(i) = Mid(figi, i, 1)
Next
For i = 2 To Len(figi) Step 3
If digit(i) = 1 Then
digit(i) = digit(i - 1) + 10: digit(i - 1) = 0
Else: If digit(i) > 1 Then digit(i) = digit(i) + 18
End If
Next
For i = 1 To Len(figi)
If (i Mod 3) = 0 And digit(i) > 0 Then words = "hundred " & words
If (i Mod 3) = 1 And digit(i) + digit(i + 1) + digit(i + 2) > 0 Then _
words = Choose(i / 3, "thousand ", "million ", "billion ") & words
words = Trim(alpha(digit(i)) & " " & words)
Next
If fig Int(fig) Then
figc = StrReverse(figi)
If figc = 0 Then figc = ""
figd = Trim(WorksheetFunction.Substitute(Str(Abs(fig)), figc & ".", ""))
words = Trim(words & " " & point)
For i = 1 To Len(figd)
If Val(Mid(figd, i, 1)) > 0 Then
words = words & " " & alpha(Mid(figd, i, 1))
Else: words = words & " Zero"
End If
Next
End If
4.If fig function > user defined > A1 or (relevent cell)
Or after completing step 1 to 4 use formula = words(A1)
5.Then if in CELL A1 is 10 number the result is ten.
Regards
CS Sunita Jamkhande
Querist : Anonymous
Querist : Anonymous
Querist : Anonymous
Click here to login now
Similar Resolved Queries
- Tax on Deemed Capital Gain
- Exiting partner in partnership firm in gst portal
- Type of Capital Gain
- Error in uploading Form 10BD
- Consequences of Non-Deduction of TDS under Income Tax???????????????
- Grand in aid
- Loss of interest in PF transfer from EPFO to Trust
- NRI INSURANCE ADVISOR
- Banking Related Issue
- Residential status of non resident
- CASH GIFT FROM BLOOD RELATIVE
- Account freezed for Ineligible ITC Scrutiny for GST Annual Return
- Rent claimed on building given on permissive possession basis
- TDS on property - Form 141 query
- Seeking Advice: High Tax Shortfall on Job Switch + Let-Out House Property Loss in FY 2025-26
- Housing Society-ITR5
- TDS on Rent received on redevelopment of building
- Indian IT Portal issue in computing tax as per UK-India DTAA
- Capital Gains on sale of residential flat
- Upload Level ValidationITR3Category of Defect B/D
Trending Online Classes
-
DT & Audit (Exam Oriented Fastrack Batch) - For May 26 Exams and onwards Full English
CA Bhanwar Borana & CA Shubham Keswani
CAclubindia
