Excel in words formula

Excel formulas let you automate your spreadsheets. But how do you use it in a Word document? Here are two ways to do it!

While you can always integrate Excel data into a Word document, it’s often unnecessary when all you need is a small table. It’s quite simple to create a table and use Excel formulas in a Word document. However, there is only a limited number of formulas that can be used.

For instance, if you’re trying to insert sales data in a table, you could add a column for sales, another one for total cost, and a third one for calculating profit using a formula. You can also calculate an average or a maximum for each of these columns.

Method 1: Paste Spreadsheet Data Into Word

If you already have data populated into a spreadsheet, you could just copy it into your Microsoft Word document.

1. Copy the cells containing the data and open a Word document.
2. From the top ribbon, click on the arrow under the Paste button, and click on Paste Special.
   
3. You’ll see a new window pop-up where you’ll need to select what you want to paste the copied content as. Select Microsoft Excel Worksheet Object and select OK.
   
4. Your data should now appear in the Word document, and the cells should contain the formulas as well.

If you want to make any edits, you can double-click on the pasted content, and your Word document will transform into an Excel document, and you’ll be able to do everything you would on a normal spreadsheet.

Method 2: Add Formulas in a Table Cell in Word

1. Quickly insert a table in your Word document and populate the table with data.
2. Navigate to the cell where you want to make your computations using a formula. Once you’ve selected the cell, switch to the Layout tab from the ribbon at the top and select Formula from the Data group.
   

   Notice that there are two tabs called Layout. You need to select the one that appears under Table Tools in the ribbon.

3. When you click on Formula, you’ll see a small window pop up.
4. The first field in the box is where you enter the formula you want to use. In addition to formulas, you can also perform basic arithmetic operations here. For instance, say you want to compute the profit, you could just use the formula:

    =B2-C2 

   Here, B2 represents the second cell in the second column, and C2 represents the second cell in the third column.

   
5. The second field allows you to set the Number Format. For instance, if you wanted to calculate profit down to two decimal places, you could select a number format accordingly.
   
6. The Paste Function field lists the formulas you can use in Word. If you can’t remember the name of a function, you could select one from the dropdown list, and it will automatically be added to the Formula field.
   
7. When you’ve entered the function, click OK, and you’ll see the computed figure in the cell.

Positional Arguments

Positional arguments (ABOVE, BELOW, LEFT, RIGHT) can often make things simpler, especially if your table is relatively large. For instance, if you have 20 or more columns in your table, you could use the formula =SUM(ABOVE) instead of referencing each cell inside the parenthesis.

You can use positional arguments with the following functions:

• SUM
• AVERAGE
• MIN
• MAX
• COUNT
• PRODUCT

For instance, we could calculate the average sales for the above example using the formula:

 =AVERAGE(ABOVE) 

If your cell is at the center of the column, you can use a combination of positional arguments. For instance, you could sum up the values above and below a specific cell using the following formula:

 =SUM(ABOVE,BELOW) 

If you want to sum up the values from both the row and the column in a corner cell, you could use the following formula:

 =SUM(LEFT,ABOVE) 

Even though Microsoft Word offers only a few functions, they are quite robust in functionality and will easily help you create most tables without running into lack-of-functionality issues.

Updating Data and Results

Unlike Excel, Microsoft Word doesn’t update formula results in real-time. However, it does update the results once you close and re-open the document. If you want to keep things simple, just update the data, close, and re-open the document.

However, if you’d like to update the formula results as you continue to work on the document, you’ll need to select the results (not just the cell), right-click on them, and select Update Field.

When you click Update Field, the formula’s result should update instantly.

Cell References

There are several ways to reference a cell in a Word document.

1. Bookmark Names

Let’s say you give your average sales value a bookmark name average_sales. If you don’t know how to give a cell a bookmark name, select the cell and navigate to Insert > Bookmark from the ribbon at the top.

Assume that the average sales value is a decimal value, and you’d like to convert it to an integer. You could reference the average sales value as ROUND(average_sales,0), and this will round the value down to its nearest integer.

2. RnCn References

The RnCn referencing convention allows you to reference a row, column, or a specific cell in a table. The Rn refers to the nth row, while the Cn refers to the nth column. If you wanted to refer to the fifth column and second row, for instance, you’d use R2C5.

You can even select a range of cells using the RnCn reference, much like you would in Excel. For instance, selecting R1C1:R1C6 selects the first six cells of the first row. For selecting the entire row in which you’re using the formula, just use R (or C for a column).

3. A1 References

This is the convention that Excel uses, and we’re all familiar with. The letter represents the columns, while the numbers represent the rows. For instance, A3 refers to the third cell in the first column.

Word Tables Made Easy

Hopefully, the next time you’ll need to use data on a Microsoft Word document, you’ll be able to do things much faster without having to first create a spreadsheet and then import it into your Word document.

Convert a number to words

To convert a number to words, the solution was always to create a very complex VBA macro. Some websites, like this one , give you an example of VBA code to do the job. But, if you aren’t familiar with VBA, it could be difficult to integrate this solution in your workbook.

Now with Excel 365 and the new LET function, you can convert a number to words. The formula is very complex and took a long time to develop. But despite this, there are certain points of the formula that must be analyzed before it can be used.

Characteristic of the formula

Before copying the complete formula and applying it to your workbook, it is important to analyze some points of the formula to avoid mistakes.

Principle of arrays in Excel

Excel 365 is the only version that can understand dynamic array (i.e. the result is returned in many cells).

An array ​​is always written between brackets. But in function of the settings of your computer, there could be a difference for the separator.

For example, for a US setting,

• the separator for the rows is the semicolon (;)
• the separator for the columns is the comma (,)

Whatever your local settings, the row separator is always the semi-colon. But for the column separator, there is difference in function of your local settings.

• in France, the column separator is the period (.)
• in Spain, the separator in the backslash ().

Check this setting on your computer before to use this formula

Decimal separator

One of the trick of this formula is to detect the decimal numbers. Decimal number or not, the formula manage the 2 situations.

The trick lies in this part of the formula.

N, SUBSTITUTE(TEXT(A1, REPT(0,9)&».00″ ),».»,»0″)

Without going too deep in the detail of this formula, the decimal separator is mentioned 2 times in this part of the formula

• .00
• and the replacement symbol of the SUBSTITUTE function at the end «.»,»0″.

If you are working with the decimal comma (,), you must replace these 2 periods by commas in the function

N, SUBSTITUTE(TEXT(A1,REPT(0,9)&»,00″ ),»,»,»0″)

Dollars / Cents or nothing

The formula will always added Dollars after the units and Cents in case of decimals.

Denom, {«million», «thousand», «Dollars», «Cents»}

Now, if you do not wish to display the words Dollars and Cents, you simply have to remove these words BUT YOU MUST KEEP the empty quotes to respect the number of occurrences in the matrix.

Denom, {«million», «thousand», «»,»»}

Formula to convert a number to words

Here is the full formula. If it’s not working, change the parameters as it is explain before.

=LET(
Denom, {» Million, «;» Thousand «;» Dollars «;» Cents»},
Nums, {«»,»One»,»Two»,»Three»,»Four»,»Five»,»Six»,»Seven»,»Eight»,» Nine»},
Teens, {«Ten»,»Eleven»,»Twelve»,»Thirteen»,»Fourteen»,»Fifteen»,»Sixteen»,»Seventeen»,»Eighteen»,»Nineteen»},
Tens, {«»,»Ten»,»Twenty»,»Thirty»,»Forty»,»Fifty»,»Sixty»,»Seventy»,»Eighty»,»Ninety»},
grp, {0;1;2;3},
LET(
N, SUBSTITUTE( TEXT( A1, REPT(0,9)&».00″ ),».»,»0″),
H, VALUE( MID( N, 3*grp+1, 1) ), T, VALUE( MID( N, 3*grp+2, 1) ),
U, VALUE( MID( N, 3*grp+3, 1) ),
Htxt, IF( H, INDEX( Nums, H+1 ) & » Hundred «, «» ),
Ttxt, IF( T>1, INDEX( Tens, T+1 ) & IF( U>0, «-«, «» ), » » ),
Utxt, IF( (T+U), IF( T=1, INDEX( Teens, U+1 ), INDEX(Nums, U+1 ) ) ),
CONCAT( IF( H+T+U, Htxt & Ttxt & Utxt & Denom, «» ) )
)
)

This formula has been created by Peter Bartholomew 👏👍

Excel Functions : Convert Numbers into Words

Function SpellCurr(ByVal MyNumber, _
Optional MyCurrency As String = "Rupee", _
Optional MyCurrencyPlace As String = "P", _
Optional MyCurrencyDecimals As String = "Paisa", _
Optional MyCurrencyDecimalsPlace As String = "S")
'*****************************************************************************************************************
'* Based on SpellNumbers UDF by Microsoft, Which handles only Dollars as currency                                *
'* UDF modfied by Yogesh Gupta, smiley123z@gmail.com, Ygblogs.blogspot.com on July 21, 2009                      *
'* UDF modified on September 04, 2009 to make currency inputs optional, by default it will use Indian Currency   *
'* This modified UDF can be used for any currency in case you provide for currency inputs                        *
'* User can define the Prefix and Sufix place for Currency and CurrencyDecimals                                  *
'* MyNumber = Numeric Value you need to convert into words                                                       *
'* MyCurrency = Name of your Currency - i.e. Dollar for USA                                                      *
'* MyCurrencyPlace = Prefix or Suffix the currency, use "P" for Prefix and "S" for Suffix                        *
'* MyCurrencyDecimals = Name of your Currency Decimals - i.e. Cent for USA                                       *
'* MyCurrencyDecimalsPlace = Prefix or Suffix the currency decimals, use "P" for Prefix and "S" for Suffix       *
'*****************************************************************************************************************
          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



  


                       
  



                    If MyCurrencyPlace = "P" Then
                Select Case Rupees
                    Case ""
                        Rupees = MyCurrency & "s" & " Zero"
                    Case "One"
                        Rupees = MyCurrency & " One"
                    Case Else
                        Rupees = MyCurrency & "s " & Rupees
                End Select
            Else
                Select Case Rupees
                    Case ""
                        Rupees = "Zero " & MyCurrency & "s"
                    Case "One"
                        Rupees = "One " & MyCurrency
                    Case Else
                        Rupees = Rupees & " " & MyCurrency & "s"
                End Select
            End If
                  If MyCurrencyDecimalsPlace = "S" Then
                Select Case Paisa
                    Case ""
                        Paisa = " Only"
                    Case "One"
                        Paisa = " and One " & MyCurrencyDecimals & " Only"
                    Case Else
                        Paisa = " and " & Paisa & " " & MyCurrencyDecimals & "s Only"
                End Select
          Else
                Select Case Paisa
                    Case ""
                        Paisa = " Only"
                    Case "One"
                        Paisa = " and " & MyCurrencyDecimals & " One " & " Only"
                    Case Else
                        Paisa = " and " & MyCurrencyDecimals & "s " & Paisa & " Only"
                End Select
          End If
                SpellCurr = 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

I found this formula below to convert amounts to words for google spreadsheets and it works perfectly. But now I want to use it in excel 2010 and I get a lot of errors. I also cannot use VBA. Thanks for any help.

=if(or(isBlank(A1),not(isNumber(A1)),A1>=power(10,15)),ifError(1/0,»Error»),trim(arrayFormula(concatenate(if(trunc(mod(A1,power(10,{15,12,9,6,3}))/power(10,{12,9,6,3,0}))<100,»»,choose(int(trunc(mod(A1,power(10,{15,12,9,6,3}))/power(10,{12,9,6,3,0}))/100),» One»,» Two»,» Three»,» Four»,» Five»,» Six»,» Seven»,» Eight»,» Nine») & » Hundred») & if(mod(trunc(mod(A1,power(10,{15,12,9,6,3}))/power(10,{12,9,6,3,0})),100)<>0,if(trunc(mod(A1,power(10,{15,12,9,6,3}))/power(10,{12,9,6,3,0}))>100,» And»,if(A1>power(10,{15,12,9,6,3}),choose({1,2,3,4,5},»»,»»,»»,»»,» And»),»»)),»») & if(mod(trunc(mod(A1,power(10,{15,12,9,6,3}))/power(10,{12,9,6,3,0})),100)=0,»»,if(mod(trunc(mod(A1,power(10,{15,12,9,6,3}))/power(10,{12,9,6,3,0})),100)<20,choose(mod(trunc(mod(A1,power(10,{15,12,9,6,3}))/power(10,{12,9,6,3,0})),100),» One»,» Two»,» Three»,» Four»,» Five»,» Six»,» Seven»,» Eight»,» Nine»,» Ten»,» Eleven»,» Twelve»,» Thirteen»,» Fourteen»,» Fifteen»,» Sixteen»,» Seventeen»,» Eighteen»,» Nineteen»),choose(int(mod(trunc(mod(A1,power(10,{15,12,9,6,3}))/power(10,{12,9,6,3,0})),100)/10),»»,» Twenty»,» Thirty»,» Forty»,» Fifty»,» Sixty»,» Seventy»,» Eighty»,» Ninety») & if(mod(mod(trunc(mod(A1,power(10,{15,12,9,6,3}))/power(10,{12,9,6,3,0})),100),10)=0,»»,»-» & choose(mod(mod(trunc(mod(A1,power(10,{15,12,9,6,3}))/power(10,{12,9,6,3,0})),100),10),»One»,»Two»,»Three»,»Four»,»Five»,»Six»,»Seven»,»Eight»,»Nine»)))) & if(trunc(mod(A1,power(10,{15,12,9,6,3}))/power(10,{12,9,6,3,0}))=0,»»,choose({1,2,3,4,5},» Trillion»,» Billion»,» Million»,» Thousand»,»»)))) & if(A1>=2,» Rand»,if(A1>=1,» Rand»,»»)) & if((round(A1-trunc(A1),2)*100=0)+(A1<1),»»,» And») & if(round(A1-trunc(A1),2)*100=0,»»,if(round(A1-trunc(A1),2)*100=1,» One Cent»,if(round(A1-trunc(A1),2)*100<20,choose(round(A1-trunc(A1),2)*100,» One»,» Two»,» Three»,» Four»,» Five»,» Six»,» Seven»,» Eight»,» Nine»,» Ten»,» Eleven»,» Twelve»,» Thirteen»,» Fourteen»,» Fifteen»,» Sixteen»,» Seventeen»,» Eighteen»,» Nineteen»),choose(int(round(A1-trunc(A1),2)*100/10),»»,» Twenty»,» Thirty»,» Forty»,» Fifty»,» Sixty»,» Seventy»,» Eighty»,» Ninety») & if(mod(round(A1-trunc(A1),2)*100,10)=0,»»,»-» & choose(mod(round(A1-trunc(A1),2)*100,10),»One»,»Two»,»Three»,»Four»,»Five»,»Six»,»Seven»,»Eight»,»Nine»))) & » Cent»))))