How to convert numbers into words in Excel.

Excel 2007, 2010, 2013, 2016, 2019
• Select the cell that you want.
• Click Insert Function on the Formulas ribbon.
• Under Or select a category, click User Defined.
• In the Select a function list, click SpellNumber, and then click OK.
• Enter the number or cell reference that you want, and then click OK.
How to create the sample function Called SpellNumber
1. Start Microsoft Excel.
2. Press ALT+F11 to start the Visual Basic Editor.
3. On the Insert menu, click Module.
4. Type the following code into the module sheet.

Option Explicit
'Main Function
Function SpellNumber(ByVal MyNumber)
    Dim Rupees, Paisa, Temp
    Dim DecimalPlace, Count
    ReDim Place(9) As String
    Place(2) = " Thousand "
    Place(3) = " Million "
    Place(4) = " Billion "
    Place(5) = " Trillion "
    ' String representation of amount.
    MyNumber = Trim(Str(MyNumber))
    ' Position of decimal place 0 if none.
    DecimalPlace = InStr(MyNumber, ".")
    ' Convert Paisa and set MyNumber to Rupee amount.
    If DecimalPlace > 0 Then
        Paisa = GetTens(Left(Mid(MyNumber, DecimalPlace + 1) & _
                  "00", 2))
        MyNumber = Trim(Left(MyNumber, DecimalPlace - 1))
    End If
    Count = 1
    Do While MyNumber <> ""
        Temp = GetHundreds(Right(MyNumber, 3))
        If Temp <> "" Then Rupees = Temp & Place(Count) & Rupees
        If Len(MyNumber) > 3 Then
            MyNumber = Left(MyNumber, Len(MyNumber) - 3)
        Else
            MyNumber = ""
        End If
        Count = Count + 1
    Loop
    Select Case Rupees
        Case ""
            Rupees = "  "
        Case "One"
            Rupees = "One Rupee"
         Case Else
            Rupees = Rupees & " Rupees"
    End Select
    Select Case Paisa
        Case ""
            Paisa = " "
        Case "One"
            Paisa = " and One Paisa"
              Case Else
            Paisa = " and " & Paisa & " Paisa"
    End Select
    SpellNumber = Rupees & Paisa
End Function
      
' Converts a number from 100-999 into text
Function GetHundreds(ByVal MyNumber)
    Dim Result As String
    If Val(MyNumber) = 0 Then Exit Function
    MyNumber = Right("000" & MyNumber, 3)
    ' Convert the hundreds place.
    If Mid(MyNumber, 1, 1) <> "0" Then
        Result = GetDigit(Mid(MyNumber, 1, 1)) & " Hundred "
    End If
    ' Convert the tens and ones place.
    If Mid(MyNumber, 2, 1) <> "0" Then
        Result = Result & GetTens(Mid(MyNumber, 2))
    Else
        Result = Result & GetDigit(Mid(MyNumber, 3))
    End If
    GetHundreds = Result
End Function
      
' Converts a number from 10 to 99 into text.
Function GetTens(TensText)
    Dim Result As String
    Result = ""           ' Null out the temporary function value.
    If Val(Left(TensText, 1)) = 1 Then   ' If value between 10-19...
        Select Case Val(TensText)
            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                                 ' If value between 20-99...
        Select Case Val(Left(TensText, 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
        Result = Result & GetDigit _
            (Right(TensText, 1))  ' Retrieve ones place.
    End If
    GetTens = Result
End Function
     
' Converts a number from 1 to 9 into text.
Function GetDigit(Digit)
    Select Case Val(Digit)
        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"
        Case Else: GetDigit = ""
    End Select
End Function

Microsoft Word: (MS WORD) (winword):


Microsoft Word is the most popular word processor both in the past and in the present , It remains to be the top choice among the different word processors available , It is an indispensable tool for most computer users , You can create the documents and complete a number of other functions related to word processing .

Microsoft Word processing has improved and it made the work of typing definitely faster and convenient , It is one of the most used aspects of information technology , The people of most ages from the young grade school student to the elder grandmother could have encountered the need for word processing .
Advantages of Microsoft Word

Microsoft Word is a great tool as typing is faster than ever , It is easy to correct the mistakes by just hitting the backspace or delete button , There are the templates for any type of document and mail merge from a database so that you can easily send out the letters to multiple people at a time .

You can align the text whether at the center , right or left margins or justified takes just one click ,  spelling and grammatical mistakes are pointed out instantly , You can correct any mistakes which are made easily , The bullets and numbers are done automatically and there is always an option to ask for help.
Microsoft Word

Microsoft Word

You can use the thesaurus feature when your words run out , The images and the figures can be attached and laid out easily , Copying the documents is fast and easy , Copies can easily be made which saves on printing and it is much easier to do , Microsoft Word can save multiple versions of documents and easily sort them so that you can go back to the previous versions of the same document  .

Microsoft Word is available practically everywhere, It comes standard on many PCs, You can typically find it on your work computer, The computers at school and your home PC , This makes it easy to save the documents on a flash drive, take them with you and work on them somewhere else, If you need to do some work, you can usually find a computer with Microsoft Word on it .

Microsoft Word lets you create the simple word processing documents like the letters and the reports , You can add color , You can use clip art , You can write in a variety of fonts and sizes , You can use the tables , the borders & the bullet formatting ,  You can format the text & the general page layout so that you can make the page look more appealing or easier to read .

Microsoft Word offers the templates to help you create numerous other documents such as the calendars and greeting cards , You can  save the documents in a variety of formats , including a Web page .

Microsoft Word can easily integrate with other Microsoft Office programs , If you have a spreadsheet that you created on Microsoft Excel , you can easily paste it into a Word document , You can work with the programs such as PowerPoint , This makes it possible to complete a wide array of computing tasks without having to spend time converting the documents or the files so that they are usable on other programs .

Microsoft Word offers an easy to use navigation pane at the top , So, You can see the visual representations of many of functions that you might need , You can simply hold your mouse cursor over an icon to see exactly what it does , Then you can click on the buttons to initiate certain functions and tasks , Instead of having to scroll through multiple menus to find something , You can usually find what you need on the pane .

While you are creating a document , Microsoft Word helps you make sure that it is the best it can be , When you misspell a word , Microsoft Word will underline it , You can click on the word and get suggested spellings , If you type a sentence that has poor grammar , It will underline the sentence for you and you can change the document while you are still working on it .

How To Add Borders Automatically To Cells In Excel