How to Extract Only Numbers from Excel Cell (7 Easy Ways)

Although Microsoft has not provided a straight formula or syntax to extract only numbers from the Excel cell, we can incorporate a wide range of Excel formulas to make a single function that can be used for extracting numbers or digits only from Excel cells. In this article, we’ll try to show and explain in detail how we can bring out only numbers from the cells with the appropriate formulas under a few criteria.


Download Practice Workbook

Download the practice book for free that we’ve used to prepare this article. You can input the text values with numbers in the selected cells and find the results immediately through embedded formulas.


7 Effective Ways to Extract Only Numbers from Excel Cell

There will be one VBA code, one Excel feature, and five practical formulas to help you extract numbers from a cell. Like in the picture below, we have some codes including digits and letters where digits are present at the beginning. We have to extract those digits or numbers only.

7 Effective Ways to Extract Only Numbers from Excel Cell


1. Pulling Out Numbers from the Beginning of a Text

In this first method, we will combine the LEFT, SUM, LEN, and SUBSTITUTE functions to pull out numbers from the beginning of a text string. Firstly, we will type this formula in the cell, and then, using the Fill Handle, we will copy that formula to the rest of the cells.

Steps:

  • Firstly, type the formula in cell C5.

=LEFT(B5,SUM(LEN(B5)-LEN(SUBSTITUTE(B5,{"0","1","2","3","4","5","6","7","8","9"},""))))

Pulling Out Only Numbers from the Beginning of a Text to Extract Those from Excel Cell

  • Secondly, press Enter and you’ll get the number 34 for the first code.

  • Thirdly, use the Fill Handle then to autofill all other cells in column C.

πŸ”Ž Formula Breakdown

➀ SUBSTITUTE(B5,{β€œ0β€³,”1β€³,”2β€³,”3β€³,”4β€³,”5β€³,”6β€³,”7β€³,”8β€³,”9β€³},””)

  • Here, the SUBSTITUTE function will find the digits (0-9) consecutively and, if found, it will replace that digit in cell B5 with an empty character every time. So, the function will return as- {β€œ34DTXRF”,”34DTXRF”,”34DTXRF”,”4DTXRF”,”3DTXRF”,”34DTXRF”,”34DTXRF”,”34DTXRF”,”34DTXRF”,”34DTXRF”}.

➀ LEN(SUBSTITUTE(B5,{β€œ0β€³,”1β€³,”2β€³,”3β€³,”4β€³,”5β€³,”6β€³,”7β€³,”8β€³,”9β€³},””))

  • The LEN function determines the number of characters in a string. So, here, the LEN function will count all the characters individually found in the texts through the SUBSTITUTE function. The resultant values will be here in our case – {7,7,7,6,6,7,7,7,7,7}.

➀ LEN(B5)-LEN(SUBSTITUTE(B5,{β€œ0β€³,”1β€³,”2β€³,”3β€³,”4β€³,”5β€³,”6β€³,”7β€³,”8β€³,”9β€³},””)))

  • Now, this part is the subtraction from the number of characters in cell B5 to all other numbers of characters found individually in the previous section of the formula. So, here the resultant values will be – {0,0,0,1,1,0,0,0,0,0}.

➀ SUM(LEN(B5)-LEN(SUBSTITUTE(B5,{β€œ0β€³,”1β€³,”2β€³,”3β€³,”4β€³,”5β€³,”6β€³,”7β€³,”8β€³,”9β€³},””)))

  • The SUM function will then simply sum all the subtracted values found & so the result will be here, 2 (0+0+0+1+1+0+0+0+0+0).

➀ =LEFT(B5,SUM(LEN(B5)-LEN(SUBSTITUTE(B5,{β€œ0β€³,”1β€³,”2β€³,”3β€³,”4β€³,”5β€³,”6β€³,”7β€³,”8β€³,”9β€³},””))))

  • And now here’s the final part where the LEFT function will return the values with an exact number of characters from the left found in the previous section of the formula. As we got the sum value as 2, the LEFT function here will return only 34 from the text 34DTXRF.

βž₯ Related: How to Separate Numbers in Excel Using Formula (5 Ways)


2. Extracting Numbers from the Right Side of a Text

In this section, we’ll extract the numbers or digits from the right side of the text string. We’ll use the RIGHT, MIN, and SEARCH functions here.

Steps:

  • To begin with, in our dataset what we have to type in cell C5 is-

=RIGHT(B5,LEN(B5) - MIN(SEARCH({0,1,2,3,4,5,6,7,8,9}, B5&"0123456789")) +1)

  • Afterward, press Enter and then use the Fill Handle to autofill the rest of the cells.

Extracting Numbers from the Right Side of a Text

πŸ”Ž Formula Breakdown

➀ B5&”0123456789β€³

  • Here, we’re concatenating values in the B5 cell with 0123456789 by using ampersand (&) between them and we’ll get the resultant value as- DTXRF340123456789.

➀ SEARCH({0,1,2,3,4,5,6,7,8,9}, B5&”0123456789β€³)

  • Now, the SEARCH function will search for all the digits (0-9) one by one in the resultant value obtained from the previous section and will return the positions of those 10 digits in the characters of DTXRF340123456789. So, here our resultant values will be- {8,9,10,6,7,13,14,15,16,17}.

➀ MIN(SEARCH({0,1,2,3,4,5,6,7,8,9}, B5&”0123456789β€³))

  • The MIN function is used to find the lowest digit or number in an array. So, here the minimum or lowest value will be- 6 from the array {8,9,10,6,7,13,14,15,16,17} found in the preceding section of the formula.

➀ LEN(B5) – MIN(SEARCH({0,1,2,3,4,5,6,7,8,9}, B5&”0123456789β€³)) +1)

  • Now, the number of characters in B5 will be found by the LEN function. Then it’ll subtract the value 6(found in the last section) and then return the result by adding 1. Here in our case, the resultant value will be 2 (7-6+1).

➀ RIGHT(B5,LEN(B5) – MIN(SEARCH({0,1,2,3,4,5,6,7,8,9}, B5&”0123456789β€³)) +1)

  • The RIGHT function will return the specified number of characters from the last or right side of a string. Following the result found through the subtraction process in the previous section, here the RIGHT function will show the last 2 characters from cell B5, and that’ll be 34.

Read More: How to Separate Numbers in One cell in Excel (5 Methods)


3. Extracting Numbers from Any Part of a Text String

Now, here’s a broad solution for all cases. This method will pull out numbers or digits from any position in a text string. Moreover, we will use the TEXTJOIN, IFERROR, INDIRECT, MID and ROW functions in this method.

Steps:

  • Firstly, type the formula in your destination cell as follows-

=TEXTJOIN("",TRUE,IFERROR((MID(B5,ROW(INDIRECT("1:"&LEN(B5))),1)*1),""))

  • Then, if you’re using Excel 2016 or higher version then press Enter, otherwise press Ctrl+Shift+Enter to get the result for this array formula.
  • After this step, autofill other cells using the Fill Handle and you’re done.

Extracting Numbers from Any Part of a Text String

πŸ”Ž Formula Breakdown

➀ INDIRECT(β€œ1:”&LEN(B5))

  • The INDIRECT function is used to store an array of cell values as a reference text. Here the ampersand (&) command concatenates the length of the characters of cell B5 with incomplete range syntax (1:).
  • So, here the INDIRECT function will store all the numbers between 1 and the length of the characters in cell B5 as a reference text.

➀ ROW(INDIRECT(β€œ1:”&LEN(B5)))

  • The ROW function usually tells the row number of a cell. But here in the INDIRECT function, as no reference cell has been mentioned, in this case, the ROW function will extract all the values or numbers from the reference texts stored in the INDIRECT function.
  • Now, for the 1st cell B5, the resultant values through these ROW and INDIRECT functions will be- {1;2;3;4;5;6;7;8;9}.

➀ (MID(B5,ROW(INDIRECT(β€œ1:”&LEN(B5))),1))

  • The MID function will let you determine the characters from the middle of a text string, given a starting position & length.
  • So, here for all 9 positions found in the previous section, the MID function now will show all the characters one by one for each position & thus will return the values as- {β€œ1β€³;”9β€³;” β€œ;”D”;”D”;”X”;”2β€³;”M”;”N”}.

➀ IFERROR((MID(B5,ROW(INDIRECT(β€œ1:”&LEN(B5))),1)*1),””)

  • Now, the IFERROR is a logical function that will determine if a string is a number or something else. If it does not identify a string with numbers or digits, then it’ll return the value with a defined text command.
  • In our case, all the values found in the last section will be multiplied by 1, and when the results are returned as value errors for letters or text values that cannot be multiplied, their IFERROR function will convert the errors into empty strings. So, our resultant values will be then- {1;9;””;””;””;””;2;””;””}.

➀ =TEXTJOIN(β€œβ€,TRUE,IFERROR((MID(B5,ROW(INDIRECT(β€œ1:”&LEN(B5))),1)*1),””))

  • And now the final part will be executed through the TEXTJOIN function. This function is used to concatenate or join two strings with a specified delimiter.
  • So, the resultant values we have found in the preceding section will now be joined together alongside this TEXTJOIN function. And thus we’ll get the number 192.

Read More: How to Extract Multiple Numbers from String in Excel (6 Methods)


4. Nesting Multiple Functions to Bring Out Only Numbers

Now, we will show you another formula to extract only numbers from any position from an Excel cell. Although it may seem quite complex, we’ll break down the whole formula and try to explain all the compact functions with ease. Additionally, we will use the IF, LARGE, INDEX, SUMPRODUCT, and ISNUMBER functions in this formula.

  • To begin with, type this formula in cell C5. You have to replace the cell reference only based on your own cell in the spreadsheet and then by embedding this formula, you’ll get the expected result right away. And this formula works perfectly in any version of Excel.

=IF(SUM(LEN(B5)-LEN(SUBSTITUTE(B5, {"0","1","2","3","4","5","6","7","8","9"}, "")))>0, SUMPRODUCT(MID(0&B5, LARGE(INDEX(ISNUMBER(--MID(B5,ROW(INDIRECT("$1:$"&LEN(B5))),1))* ROW(INDIRECT("$1:$"&LEN(B5))),0), ROW(INDIRECT("$1:$"&LEN(B5))))+1,1) * 10^ROW(INDIRECT("$1:$"&LEN(B5)))/10),"")

Nesting Multiple Functions to Bring Out Only Numbers

  • After that, you have to press Enter only after typing the entire formula and you’re done.

πŸ”Ž Formula Breakdown

Before starting the breakdown of this massive & compact formula, we can separate it into some parts like-

=IF(A>0, SUMPRODUCT(B1*C1, B2*C2, ……….BnCn),””)

This syntax means if A is greater than 0, then all the products of Bn and Cn will sum up to the final result. And if A is not greater than 0 then the result will return as an empty or blank cell.

  • A = SUM(LEN(B5)-LEN(SUBSTITUTE(B5, {β€œ0β€³,”1β€³,”2β€³,”3β€³,”4β€³,”5β€³,”6β€³,”7β€³,”8β€³,”9”}, β€œβ€
  • B = MID(0&B5, LARGE(INDEX(ISNUMBER(–MID(B5,ROW(INDIRECT(β€œ$1:$”&LEN(B5))),1))* ROW(INDIRECT(β€œ$1:$”&LEN(B5))),0), ROW(INDIRECT(β€œ$1:$”&LEN(B5))))+1,1)
  • C = 10^ROW(INDIRECT(β€œ$1:$”&LEN(B5)))/10),””

Breakdown of Part A = SUM(LEN(B5)-LEN(SUBSTITUTE(B5, {β€œ0β€³,”1β€³,”2β€³,”3β€³,”4β€³,”5β€³,”6β€³,”7β€³,”8β€³,”9”}, β€œβ€

➀ SUBSTITUTE(B5, {β€œ0β€³,”1β€³,”2β€³,”3β€³,”4β€³,”5β€³,”6β€³,”7β€³,”8β€³,”9”}, β€œβ€)

  • The SUBSTITUTE function will find all digits (0-9) one by one in the text 19 DDX2MN each time and will replace those digits with an empty string in the positions of the digits.
  • Thus the resultant values in an array will be- {β€œ19 DDX2MN”,”9 DDX2MN”,”19 DDXMN”,”19 DDX2MN”,”19 DDX2MN”,”19 DDX2MN”,”19 DDX2MN”,”19 DDX2MN”,”19 DDX2MN”,”1 DDX2MN”}.

➀ LEN(SUBSTITUTE(B5, {β€œ0β€³,”1β€³,”2β€³,”3β€³,”4β€³,”5β€³,”6β€³,”7β€³,”8β€³,”9”}, β€œβ€))

  • The LEN function will now count the number of characters in all string values obtained from the previous section. So, this function will return as- {9,8,8,9,9,9,9,9,9,8}.

➀ LEN(B5)-LEN(SUBSTITUTE(B5, {β€œ0β€³,”1β€³,”2β€³,”3β€³,”4β€³,”5β€³,”6β€³,”7β€³,”8β€³,”9”}, β€œβ€))

  • Now in this part of the formula, a number of characters in cell B5 will subtract all the numbers found in the preceding section. The resultant values will be then- {0,1,1,0,0,0,0,0,0,1}.

➀ SUM(LEN(B5)-LEN(SUBSTITUTE(B5, {β€œ0β€³,”1β€³,”2β€³,”3β€³,”4β€³,”5β€³,”6β€³,”7β€³,”8β€³,”9”}, β€œβ€)))

  • With the help of the SUM function, the values inside the array found in the last section will add up to 3 (0+1+1+0+0+0+0+0+0+1).
  • So, according to the first part of our formula, A>0 (3>0). Now, we’ll move to the next part of the breakdown.

Breakdown of Part B = MID(0&B5, LARGE(INDEX(ISNUMBER(–MID(B5,ROW(INDIRECT(β€œ$1:$”&LEN(B5))),1))* ROW(INDIRECT(β€œ$1:$”&LEN(B5))),0), ROW(INDIRECT(β€œ$1:$”&LEN(B5))))+1,1)

➀ INDIRECT(β€œ$1:$”&LEN(B5))

  • The INDIRECT function here will store the string values as a reference to the array. Inside the parenthesis, the ampersand (&) command will join the number of characters found in cell B5 with the Range of cells’ syntax. It means that from 1 to the number of characters defined, each will be stored as an array reference.

➀ ROW(INDIRECT(β€œ$1:$”&LEN(B5)))

  • Now, this ROW function will pull out all the numbers from the array and the resultant values for cell B5 will be- {1;2;3;4;5;6;7;8;9}.

➀ MID(B5,ROW(INDIRECT(β€œ$1:$”&LEN(B5))),1)

  • In this part of the formula, the MID function will express all the characters from cell B5 based on all the positions found as numbers in the previous section. So, the extracted values will be found after this part- {β€œ1β€³;”9β€³;” β€œ;”D”;”D”;”X”;”2β€³;”M”;”N”}.

➀ ISNUMBER(–MID(B5,ROW(INDIRECT(β€œ$1:$”&LEN(B5))),1))

  • As ISNUMBER is a logical function, it’ll determine individually if the values found in the preceding section are number strings or not. If yes, then it’ll return as TRUE, otherwise, it’ll display as FALSE.
  • So, in our case, the result will be- {TRUE;TRUE;FALSE;FALSE;FALSE;FALSE;TRUE;FALSE;FALSE}.

➀ INDEX(ISNUMBER(–MID(B5,ROW(INDIRECT(β€œ$1:$”&LEN(B5))),1))*ROW(INDIRECT(β€œ$1:$”&LEN(B5))),0)

  • If you notice inside the above function, a double-hyphen, known as Double Unary, has been used. It is used to convert all logical values into number strings- 1(TRUE) or 0(FALSE). Now, the INDEX function will return this result as- {1;1;0;0;0;0;1;0;0}.
  • After that, the resultant values will be multiplied by the values obtained from the ROW function inside the array and the outcome will be- {1;2;0;0;0;0;7;0;0}.

➀ LARGE(INDEX(ISNUMBER(–MID(B5,ROW(INDIRECT(β€œ$1:$”&LEN(B5))),1))*ROW(INDIRECT(β€œ$1:$”&LEN(B5))),0), ROW(INDIRECT(β€œ$1:$”&LEN(B5))))

  • The LARGE function will now rearrange the largest values from the array according to the positions based on the numbers found in the ROW functions. & our resultant values for this section of the formula will be- {7;2;1;0;0;0;0;0;0}.

➀ MID(0&B5, LARGE(INDEX(ISNUMBER(–MID(B5,ROW(INDIRECT(β€œ$1:$”&LEN(B5))),1))*ROW(INDIRECT(β€œ$1:$”&LEN(B5))),0), ROW(INDIRECT(β€œ$1:$”&LEN(B5))))+1,1)

  • Now, this part of the function will concatenate 0 with the texts in cell B5. Then it’ll add 1 individually with all the numbers found in the last section and show the characters from B5 cell based on the defined number positions.
  • So, our outcome from this section will be- {β€œ2β€³;”9β€³;”1β€³;”0β€³;”0β€³;”0β€³;”0β€³;”0β€³;”0”}.

Breakdown of Part C = (10^ROW(INDIRECT(β€œ$1:$”&LEN(B5)))/10),””)

  • This part will determine the powers of 10 & store them inside the array. The digits of the powers are the numbers found from the ROW function previously.
  • This part of the formula will return the values as- {1;10;100;1000;10000;100000;1000000;10000000;100000000}.

Multiplication of Bn and Cn

  • Now, the resultant values from the last two major breakdowns of B and C will now be multiplied inside the array. Then the products found from the multiplications will be- {2;90;100;0;0;0;0;0;0}.
  • And finally, the SUMPRODUCT function will sum these values found in the array. So, our final outcome will be 192 (2+90+100+0+0+0+0+0+0), which is the extracted numbers from cell B5.

Read More: How to Separate Text and Numbers in Excel (4 Easy Ways)


5. Extracting Five Digit Numbers from String

We will use another formula to extract five digits numbers from any part of a string in Excel. We’ll use the CONCAT and SEQUENCE functions for the first time in this section. Moreover, we have changed our dataset slightly for this method.

Steps:

  • Firstly, select the cell range C5:C12.
  • Secondly, type the following formula.

=CONCAT(IFERROR(0+MID(B5,SEQUENCE(LEN(B5)),1),""))

Extracting Five Digit Numbers Only from String to Extract from Excel Cell

  • Finally, press Ctrl+Enter.

πŸ”Ž Formula Breakdown

  • LEN(B5)
    • Output: 11.
    • This function returns the length of the string.
  • SEQUENCE(11)
    • Output: {1;2;3;4;5;6;7;8;9;10;11}.
    • This function returns the first eleven numbers.
  • MID(B5,{1;2;3;4;5;6;7;8;9;10;11},1)
    • Output: {β€œ1β€³;”9β€³;” β€œ;”D”;”D”;”X”;”2β€³;”M”;”N”;”3β€³;”3β€³}.
    • Using this part, we are getting the individual characters from the string.
  • 0+{β€œ1β€³;”9β€³;” β€œ;”D”;”D”;”X”;”2β€³;”M”;”N”;”3β€³;”3β€³}
    • Output: {1;9;#VALUE!;#VALUE!;#VALUE!;#VALUE!;2;#VALUE!;#VALUE!;3;3}.
    • When we add zero with a string, it will return an error.
  • IFERROR({1;9;#VALUE!;#VALUE!;#VALUE!;#VALUE!;2;#VALUE!;#VALUE!;3;3},””)
    • Output: {1;9;””;””;””;””;2;””;””;3;3}.
    • We are getting blank for all error values.
  • CONCAT({1;9;””;””;””;””;2;””;””;3;3})
    • Output: 19233.
    • Finally, we are adding all the values to extract five digit numbers only.

6. Using Flash Fill to Extract Numbers Within a Range

Using the Flash Fill feature is easier and simpler than any other method mentioned above. We’re going to extract numbers from any position in the text strings. To execute this method properly, we have to help Excel find the pattern of the cell values in a column or a row by doing the extraction for the first two values only.

Steps:

  • To begin with, type the numbers manually in cell C5.

Using Flash Fill to Extract Only Numbers Within a Range from Excel Cell

  • Then, start typing the numbers from cell B6 to cell C6 and Excel will automatically recognize the pattern.
  • Finally, press Enter.

Notes: This method has some drawbacks, which is why it’s not recommended for all cases when you need to extract numbers from text strings. The Flash Fill usually follows a pattern from the cells in a column or a range. So, the first 2 or 3 extractions or calculations have to be done manually to help Excel absorb the common pattern of the resultant values. But sometimes, it does not follow the exact pattern we need and, thereby, it’ll follow its own pattern and give you a mismatched result.

For example, if we had to extract two zeros (00) from the data given, it’d show only one zero, not two. Then if you want to extract numbers from the beginning or the last positions in a cell, it’ll extract text values too, along with the numbers.

Read More: How to Extract Numbers after a Specific Text in Excel (2 Suitable Ways)


7. Applying VBA Code to Extract Only Numbers from Excel Cell

If you are interested in using the Excel VBA Macro to extract numbers only from the cells, then you’d like to follow the steps below. We will show you how to type the code in the VBA Module window. This code will ask the user to specify the input and output cell ranges.

Steps:

  • Firstly, Press ALT+F11 to open the VBA window.
  • Then, from the Insert tab, select the Module command. A new module window will appear where you’ll type the codes.

Applying VBA Code to Extract Only Numbers from Excel Cell

  • Thirdly, inside your module, paste the following codes after copying.
Option Explicit
Sub ExtractNumbersOnly()
    Dim CellValue As Range
    Dim InBx1 As Range
    Dim InBx2 As Range
    Dim NumChar As Integer
    Dim StartChar As Integer
    Dim XtrNum As String
    Dim DBxName1 As String
    Dim DBxName2 As String
    Dim Iteration As Integer
    DBxName1 = "Input Data Selection"
    DBxName2 = "Output Cell Selection"
    Set InBx1 = Application.InputBox("Input Range of Text Cells:", _
    DBxName1, "", Type:=8)
    If TypeName(InBx1) = "Nothing" Then Exit Sub
    Set InBx2 = Application.InputBox("Select Output Cells:", _
    DBxName2, "", Type:=8)
    If TypeName(InBx2) = "Nothing" Then Exit Sub
    Iteration = 0
    XtrNum = ""
    For Each CellValue In InBx1
        Iteration = Iteration + 1
        NumChar = Len(CellValue)
        For StartChar = 1 To NumChar
            If IsNumeric(Mid(CellValue, StartChar, 1)) Then
            XtrNum = XtrNum & Mid(CellValue, StartChar, 1)
            End If
        Next StartChar
    InBx2.Item(Iteration) = XtrNum
    XtrNum = ""
    Next CellValue
End Sub

  • Afterward, press F5 to execute the code. A dialogue box named β€œInput Data Selection” will appear.
  • Then, select all the text cells (i.e. B5:B12) and press OK.

  • After that, another dialogue box named β€œOutput cell Selection” will appear where you have to select a particular cell or range of cells to see the output data or values.
  • Finally, select the cell range C5:C12 and press Enter.

  • Consequently, you’ll see the extracted numbers from the texts all at once. Thus, we will finish the seven quick methods to extract numbers only from Excel cell.

πŸ”Ž VBA Code Breakdown

➀ Declaring Parameters

Option Explicit
Sub ExtractNumbersOnly()
    Dim cellValue As Range
    Dim InBx1 As Range
    Dim InBx2 As Range
    Dim NumChar As Integer
    Dim StartChar As Integer
    Dim XtrNum As String
    Dim DBxName1 As String
    Dim DBxName2 As String
    Dim Iteration As Integer
    DBxName1 = "Input Data Selection"
    DBxName2 = "Output cell Selection"
  • Here in this part at first, we’re declaring all our parameters as integers, string values, or ranges of cells. Then we are giving the names of our dialogue boxes with β€œInput Data Selection” and β€œOutput cell Selection”.

➀ Defining the Types of Inputs & Outputs for Dialogue Boxes

    Set InBx1 = Application.InputBox("Input Range of Text Cells:", _
    DBxName1, "", Type:=8)
    If TypeName(InBx1) = "Nothing" Then Exit Sub
    Set InBx2 = Application.InputBox("Select Output Cells:", _
    DBxName2, "", Type:=8)
    If TypeName(InBx2) = "Nothing" Then Exit Sub
    Iteration = 0
    XtrNum = ""
  • Now we’re defining the parameters and their types for the dialogue boxes. Here, adding Type:=8 means the input and output data will consist of reference cells or a range of cells.
  • We’re also defining that if input data is not found, then the subroutine will stop. By mentioning this macro, the subroutine will not break down for missing data, but rather it’ll stop functioning.

➀ Combining the Functions Inside the Code Loops for Iterations

For Each cellValue In InBx1
        Iteration = Iteration + 1
        NumChar = Len(cellValue)
        For StartChar = 1 To NumChar
            If IsNumeric(Mid(cellValue, StartChar, 1)) Then
            XtrNum = XtrNum & Mid(cellValue, StartChar, 1)
            End If
        Next StartChar
    InBx2.Item(Iteration) = XtrNum
    XtrNum = ""
    Next cellValue
End Sub
  • Last, of all, this is the most crucial part where we’re applying the functions or formulas that we need to assign to the texts to find the resultant values from the strings.
  • One of the major advantages of coding a function for Excel is that it’s not necessary to type a large formula like we had to do in previous methods, as VBA has built-in commands to use For or While loops where iteration for each and every detail in a text string can be executed without any hassle.

Read More: How to Separate Numbers From Text in Excel VBA (3 Methods)


Conclusion

We have shown you 7 easy methods to extract only numbers from an Excel cell. Extracting only numbers from a text string is not as simple as it seems because it requires a combination of multiple functions, which makes the final formula or syntax complicated. But we hope how we’ve tried to illustrate the formulas by breaking down the inner functions has helped you to understand the syntax with a bit of comfort and ease.

If you find any other functions or formulas that we should have added here, then please let us know through your valuable comments. Or you can have a glance at our more informative and interesting articles related to Excel functions on this website.


Further Readings

Nehad Ulfat

Nehad Ulfat

Hello, Welcome to my profile. I'm a Technical Content Creator as well as a Naval Architect & Marine Engineer. I have preferences to do analytical reasoning & writing articles on various statistical data. Here, you'll find my published articles on Microsoft Excel & other topics related to my interests!

4 Comments
  1. This is excellent, how to sum each numbers from formula output like in B5 cell if output is 192 then sum 19+2

  2. Semi-QualifiΓ© 3 = SQ3
    Semi-QualifiΓ© 1 = SQ1
    ManΕ“uvre SpΓ©cialisΓ© = MS

    what is formula to simplyfy the words each first letter and combine like =

    • Hello Theva,
      Glad that you shared your query. As per your given example, if you want to simplify the first letter of each word along with numbers, apply this simple VBA code.

      Function ExtractFirstLetters(rng As Range) As String
      Dim arry
      Dim X As Long
      arry = VBA.Split(rng, " ")
      If IsArray(arry) Then
      For X = LBound(arry) To UBound(arry)
      ExtractFirstLetters = ExtractFirstLetters & Left(arry(X), 1)
      Next X
      Else
      ExtractFirstLetters = Left(arry, 1)
      End If
      End Function

      Note that, if the words in your dataset are separated by Hyphens () then insert this line in the code
      arry = VBA.Split(rng, "-")
      Instead of this,
      arry = VBA.Split(rng, " ")

      I hope this will solve your problem. Let us know your feedback.

      Regards,
      Guria
      ExcelDemy.

Leave a reply

5 Excel Tips
You Never Knew

Genius tips to help you unlock Excel's hidden features

FREE EMAIL BONUS

ExcelDemy
Logo