I am looking for a way to convert numbers to

words in Excel worksheet.

1=One

100= Hundred

1000=Thousand

10000=Ten Thousand

100000=One lakh

1000000=Ten lakh

10000000=One Crore

any help would be HUGE

cheers,

sandeep

words in Excel worksheet.

1=One

100= Hundred

1000=Thousand

10000=Ten Thousand

100000=One lakh

1000000=Ten lakh

10000000=One Crore

any help would be HUGE

cheers,

sandeep

- Custom Function: Convert Number To Words Returns #NAME!
- Convert number to word (text)
- How I convert number to word
- How do i convert number to wording
- I wish excel to convert number to words ie 23 to twenty three
- How do I convert numbers to words (1000 to One Thousand) in Excel
- Problem with Function to Convert Number To Words
- How I convert number to word
- Converting numbers to words format turned into bet
- Convert of number to words
- Convert Number to Word
- Convert Number to Words (Indian Format)
- VBA: Numbers to Words macro?
- Number to words literal
- How do i covert number to words in excel?
- Conversion from Number to words
- Convert Figures to Words in Excel
- Number to Words
- How do i convert numbers to words
- How to convert number into word in excel i.e. 100 to one hundred
- How to automatically convert a number to words in Excel
- Number to Word convertion
- Is there any function to convert the numeric number to words
- Convert from number to word in excel

What is going wrong. It used to work fine in Excel 2003, and The work book is in Excel 2003 Format.

Convert a Numeric Value into English Words

Convert a Currency or Value into English Words

word.

Say, if i have 123 at cell A1 what should be formula at B1 which would

automatically display "One hundred twenty three".

How to use "Spelltext"?

for example 1,100 = One Thousnad One Hundred.

I there any function or method by which i can

convert number to wording.

How do I convert numbers to words .

eg: 1000 to One Thousand

eg: 127 to One Hundred and Tweny Seven

eg: 1000 to One Thousand

eg: 127 to One Hundred and Tweny Seven

I have obtained the following function from the Net (not sure from

which site)

It converts Numbers to Words in Indian Style Currency Format

It has following problem displaying for Unit and Tens Only for eg.

1 - is displayed as One Thousand One Only

2 - is displayed as Two Thousand Two Only

....

....

....

99 - is displayed as Ninety Nine Thousand Ninety Nine Only

1.10 - is displayed as One Thousand One And Ten Paisa Only

12.12 - is displayed as Rupees Twelve Thousand Twelve and Twelve

Paisa only

....

....

Rest all format from Hundreds onwards i.e. 123.45, 1234.56, 12345.67,

etc....are working perfect.

Can anyone help me in rectifying the problems of Unit and Tens?

I am using Excel 2003

Thanks in advance

Rashid Khan

Option Explicit

' Function for conversion of a Currency to words

' Parameter - accept a Currency

' Returns the number in words format

'*************************************************

Function CurrencyToWord(ByVal MyNumber)

Dim Temp

Dim Rupees, Paisa As String

Dim DecimalPlace, iCount

Dim Hundred, Words As String

ReDim Place(9) As String

Place(0) = " Thousand "

Place(2) = " Lakh "

Place(4) = " Crore "

Place(6) = " Arab "

Place(8) = " Kharab "

On Error Resume Next

' Convert MyNumber to a string, trimming extra spaces.

MyNumber = Trim(Str(MyNumber))

' Find decimal place.

DecimalPlace = InStr(MyNumber, ".")

' If we find decimal place...

If DecimalPlace > 0 Then

' Convert Paisa

Temp = Left(Mid(MyNumber, DecimalPlace + 1) & "00", 2)

Paisa = " and " & ConvertTens(Temp) & " Paisa"

' Strip off paisa from remainder to convert.

MyNumber = Trim(Left(MyNumber, DecimalPlace - 1))

End If

' Convert last 3 digits of MyNumber to rupees in word.

Hundred = ConvertHundred(Right(MyNumber, 3))

' Strip off last three digits

MyNumber = Left(MyNumber, Len(MyNumber) - 3)

iCount = 0

Do While MyNumber <> ""

'Strip last two digits

Temp = Right(MyNumber, 2)

If Len(MyNumber) = 1 Then

Words = ConvertDigit(Temp) & Place(iCount) & Words

MyNumber = Left(MyNumber, Len(MyNumber) - 1)

Else

Words = ConvertTens(Temp) & Place(iCount) & Words

MyNumber = Left(MyNumber, Len(MyNumber) - 2)

End If

iCount = iCount + 2

Loop

CurrencyToWord = "Rupees " & Words & Hundred & Paisa & " only"

End Function

' Conversion for Hundred

'*****************************************

Private Function ConvertHundred(ByVal MyNumber)

Dim Result As String

' Exit if there is nothing to convert.

If Val(MyNumber) = 0 Then Exit Function

' Append leading zeros to number.

MyNumber = Right("000" & MyNumber, 3)

' Do we have a Hundred place digit to convert?

If Left(MyNumber, 1) <> "0" Then

Result = ConvertDigit(Left(MyNumber, 1)) & " Hundred "

End If

' Do we have a tens place digit to convert?

If Mid(MyNumber, 2, 1) <> "0" Then

Result = Result & ConvertTens(Mid(MyNumber, 2))

Else

' If not, then convert the ones place digit.

Result = Result & ConvertDigit(Mid(MyNumber, 3))

End If

ConvertHundred = Trim(Result)

End Function

' Conversion for tens

'*****************************************

Private Function ConvertTens(ByVal MyTens)

Dim Result As String

' Is value between 10 and 19?

If Val(Left(MyTens, 1)) = 1 Then

Select Case Val(MyTens)

Case 10: Result = "Ten"

Case 11: Result = "Eleven"

Case 12: Result = "Twelve"

Case 13: Result = "Thirteen"

Case 14: Result = "Fourteen"

Case 15: Result = "Fifteen"

Case 16: Result = "Sixteen"

Case 17: Result = "Seventeen"

Case 18: Result = "Eighteen"

Case 19: Result = "Nineteen"

Case Else

End Select

Else

' .. otherwise it's between 20 and 99.

Select Case Val(Left(MyTens, 1))

Case 2: Result = "Twenty "

Case 3: Result = "Thirty "

Case 4: Result = "Forty "

Case 5: Result = "Fifty "

Case 6: Result = "Sixty "

Case 7: Result = "Seventy "

Case 8: Result = "Eighty "

Case 9: Result = "Ninety "

Case Else

End Select

' Convert ones place digit.

Result = Result & ConvertDigit(Right(MyTens, 1))

End If

ConvertTens = Result

End Function

Private Function ConvertDigit(ByVal MyDigit)

Select Case Val(MyDigit)

Case 1: ConvertDigit = "One"

Case 2: ConvertDigit = "Two"

Case 3: ConvertDigit = "Three"

Case 4: ConvertDigit = "Four"

Case 5: ConvertDigit = "Five"

Case 6: ConvertDigit = "Six"

Case 7: ConvertDigit = "Seven"

Case 8: ConvertDigit = "Eight"

Case 9: ConvertDigit = "Nine"

Case Else: ConvertDigit = ""

End Select

End Function

word.

Say, if i have 123 at cell A1 what should be formula at B1 which would

automatically display "One hundred twenty three".

How to use "Spelltext"?

how can i convert numbers into word format for example:

Number.......................Words

1...............................One

100............................one Hundred

956............................Nine hundred fifty six

Please help me coz one of my friend said it is possible only to write the Words for the whole numbers (Impossible coz of too much numbers and upto many decimal). But i insisteted that there might be solution esp in VB. And he also bet that there is no solution.PLz any one can help me.plz if any one have code plz paste it in the reply because i am just novice to VB.

Thanks in Advance

AY

i am using office 2007, How i convert numbers to words. suppose 101 can be written like (one hundred one). sir please give me the command of this probem.

for example to convert 1,23,123.56 into "Rupees one lac twenty three

thousand one hundred twenty three and paise fifty six only"

--

Tilak Minocha

------------------------------------------------------------------------

Tilak Minocha's Profile: http://www.officehelp.in/member.php?userid=43

View this thread: http://www.officehelp.in/showthread.php?t=646497

Visit - http://www.officehelp.in | http://www.officehelp.in/index/index.php/

Is it possible to get a macro to convert numbers to words format for Indian Rupees types?

ie.,,

Rs. 1,000 - to - Rupees One thousand only

Rs.10,000 - to- Rupees Tenthousand only

Rs.1,00,000-to - Rupees One lakh only

Rs.10,00,000-to- Rupees Ten lakhs only

Rs.1,00,00,000- to Rupees One crore only

Rs.10,00,00,000-to -Rupees Ten crores only!!

suriya

I need a funtion to convert Number to words literally, I mean 1241 (One Two

four one)

I found many examples for currency but I need literal every number to word.

Thanks in advance.

words Like One Hundred, Like this I want to convert numbers to words. Please

help me. I am waiting for ur reply.

I found a VB code which convert number to word but it is useful only for USD.

I want some programme which will be useful for other currencies also like EURO,Yen,Pound etc.

for eg.the number 550 should be converted to Five Hundred and Fifty

Please help me to convert numbers to words in excel

Eg.: 123 one hundred twenty three.

Vicky

into readen words for example if I write 1500 then it will directly be

displayed as one thousand and five hundred. I have a function called BAHTTEXT

it does this but in Thai !!!!!!!! So there has to be something similar in

English or in any other language. Please I need your help urgently.

wrote 100 in a cell it should show me "one hunderd" in a corresponding cell.

I tried and find out a function "bahttex" which convert number into words;

but this function shows the answer in the THAI language, again need is there

to convert the THAI language to english langauge.

Can anybody help me out in this regard?

Thanks

Shiv Trehan

eg: 1234 as one thousand two hundred and thirty four.

I am using Xp.

Any body can help me out for convertion of the number to word like e.g:

INR. 1320.50 - should come like INR One thousand three hundred twenty

and Paise Fifty only.

Thanx

--

kashinath

Posted from - http://www.officehelp.in

convert to "One hundred and fifty cents"

Thanks!

----------------

This post is a suggestion for Microsoft, and Microsoft responds to the

suggestions with the most votes. To vote for this suggestion, click the "I

Agree" button in the message pane. If you do not see the button, follow this

link to open the suggestion in the Microsoft Web-based Newsreader and then

click "I Agree" in the message pane.

http://www.microsoft.com/office/comm...heet.functions