Tip: Other languages are Google-Translated. You can visit the English version of this link.
Log in
x
or
x
x
Register
x

or

How to break or split number into individual digits in Excel?

Supposing you need to break or split number into individual digits as below screenshot shown, what can you do to achieve it? This article will provide two methods for you.


Easily split number into individual digits in Excel

Kutools for Excel's Split Cells utility helps you easily split number into individual digits or split cell contents by space, comma, new line or other separators into separated rows or columns in Excel as below screenshot showed. Download the full feature 60-day free trail of Kutools for Excel now!

Excel Productivity Tools

Office Tab: Bring powerful tabs to Office (include Excel), just like Chrome, Safari, Firefox and Internet Explorer. Save you half the time, and reduce thousands of mouse clicks for you. 30-day Unlimited Free Trial

Kutools for Excel: Save 70% of your time and solve 80% Excel problems for you. 300+ advanced features designed for 1500+ work scenario, make Excel much easy and increase productivity immediately.60-day Unlimited Free Trial


Break or split number into individual digits with formula

This section will show a formula to split selected number cells into individual digits in Excel.

1. Select a blank cell (says cell C1) for locating the first split digit of number in cell A1, then enter formula =MID($A1,COLUMN()-(COLUMN($C1)- 1),1) into the formula bar, and then press the Enter key.

Note: In the formula, A1 is the cell with number you need to split to digits, and C1 is the cell for locating the first split digit. Please change them as you need.

2. Keep selecting cell C1, then drag the Fill Handle to the right cells until all digits of cell A1 are split out.

3. Keep these split digit cells selected, and drag the Fill Handle down to the cells until all numbers are split into separated digits. See screenshot:


Break or split number into individual digits with Kutools for Excel

The Split Cells utility of Kutools for Excel helps you easily split all selected number cells into individual digits at once. Please do as follows.

Kutools for Excel : with more than 300 handy Excel add-ins, free to try with no limitation in 60 days. 

1. Select cells with number you need to split into digits, then click Kutools > Text > Split Cells. See screenshot:

2. In the Split Cells dialog box, please select Split to Columns option in the Type section, and in the Specify a separator section, select Specify width and enter number 1 into the textbox. Click the OK button.

3. In the next popping up Split Cells dialog box, please specify a blank cell for locating the first split digit, and then click the OK button.

After clicking the OK button, all numbers in selected cells are split into separated digits immediately as below screenshot shown.


Office Tab - Tabbed Browsing, Editing, and Managing of Workbooks in Excel:

Office Tab brings the tabbed interface as seen in web browsers such as Google Chrome, Internet Explorer new versions and Firefox to Microsoft Excel. It will be a time-saving tool and irreplaceble in your work. See below demo:

Click for free trial of Office Tab!

Office Tab for Excel


Break or split number into individual digits with Kutools for Excel

Kutools for Excel includes more than 300 handy Excel tools. Free to try with no limitation in 60 days. Download the free trial now!


Excel Productivity Tools

Ribbon of Excel (with Kutools for Excel installed)

300+ Advanced Features Increase Your Productivity by 70%, and Help You To Stand Out From Crowd!

Would you like to complete your daily work quickly and perfectly? Kutools For Excel brings 300+ cool and powerful advanced features (Combine workbooks, sum by color, split cell contents, convert date, and so on...) for 1500+ work scenarios, helps you solve 80% Excel problems.

  •  Deal with all complicated tasks in seconds, help to enhance your work ability, get success from the fierce competition, and never worry about being fired.
  •  Save a lot of work time, leave much time for you to love and care the family and enjoy a comfortable life now.
  •  Reduce thousands of keyboard and mouse clicks every day, relieve your tired eyes and hands, and give you a healthy body.
  •  Become an Excel expert in 3 minutes, and get admiring glance from your colleagues or friends.
  •  No longer need to remember any painful formulas and VBA codes, have a relaxing and pleasant mind, give you a thrill you've never had before.
  •  Spend only $39, but worth than $4000 training of others. Being used by 110,000 elites and 300+ well-known companies.
  •  60-day unlimited free trial. 60-day money back guarantee. Free upgrade and support for 2 years. Buy once, use forever.
  •  Change the way you work now, and give you a better life immediately!

Office Tab Brings Efficient And Handy Tabs to Office (include Excel), Just Like Chrome, Firefox, And New IE

  • Increases your productivity by 50% when viewing and editing multiple documents.
  • Reduce hundreds of mouse clicks for you every day, say goodbye to mouse hand.
  • Open and create documents in new tabs of same window, rather than in new windows.
  • Help you work faster and easily stand out from the crowd! One second to switch between dozens of open documents!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Vikash Srivastav · 1 months ago
    Dear Sir,


    bill no bill Date Party Name Item Name Acutal Quantity
    01 01-04-2019 abc mobile 20


    ISKO TWENTIES ROW ME LANA HAI



    KINDLY MADAD KIJIYE VERY VERY IMPORTANT
  • To post as a guest, your comment is unpublished.
    Jagan · 3 months ago
    Final Text: BEARING, BALL; TYPE: DEEP GROOVE, CAGE MATERIAL: STEEL, ROW QUANTITY: SINGLE, INSIDE DIAMETER: 30 MM, OUTSIDE DIAMETER: 72 MM, WIDTH: 19 MM, CLOSURE TYPE: SINGLE SHIELDED, LOAD CAPACITY: DYNAMIC: 29.6, STATIC: 16 KN, SPEED: 13000 RPM; MANUFACTURER PART NO 63 63 6306 Z SKF

    I want to find the "63 6306 Z SKF" within the final text, Can anyone guide me
    • To post as a guest, your comment is unpublished.
      crystal · 2 months ago
      Hi Jagan,
      The final text you shown above locate in one cell? or would you please provide a screenshot of your example showing what you are exactly trying to do?
  • To post as a guest, your comment is unpublished.
    Yogesh kumar · 9 months ago
    if data is in below format what will do?
    DDD 1 2 3 4 5 6 7 8 9 10 11 12 13 14
    1,2,3,5,15,12,11
    12,10,13,11,5,2,4
    1,5,7,4


    Need number from 1st cell to below heading number(i.e. if we have 1,5,11 then answer put in cell below 1,5,11)
  • To post as a guest, your comment is unpublished.
    Priya · 1 years ago
    Option Explicit
    'Main Function
    Function NumberToText(ByVal MyNumber)
    Dim Count
    Dim Result
    Dim NLength
    Count = 1
    NLength = Len(MyNumber) + 1
    Do While Count < NLength
    Result = Result & GetDigit(Mid(MyNumber, Count, Count)) & Space(1)
    Count = Count + 1
    Loop
    NumberToText = Result
    End Function

    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 = "Zero"
    End Select
    End Function


    I am trying to convert digits into words for preparing mark sheet purpose. Eg: 63 => Six Three but this is not working with 3 digit number Eg:798 =>Seven Zero Eight ERROR. Please Help
    • To post as a guest, your comment is unpublished.
      crystal · 1 years ago
      Dear Priya,
      The following User-defined function can help you.

      Function NumberToText(ByVal xNum)
      Dim I As Long
      Dim xTemp As Long
      Dim xStr As String
      Dim Result As String
      For I = 1 To Len(xNum)
      xTemp = Mid(xNum, I, 1)
      Select Case xTemp
      Case 1: xStr = "One"
      Case 2: xStr = "Two"
      Case 3: xStr = "Three"
      Case 4: xStr = "Four"
      Case 5: xStr = "Five"
      Case 6: xStr = "Six"
      Case 7: xStr = "Seven"
      Case 8: xStr = "Eight"
      Case 9: xStr = "Nine"
      Case Else: xStr = "Zero"
      End Select
      Result = Result & xStr & Space(1)
      Next
      NumberToText = Result
      End Function
  • To post as a guest, your comment is unpublished.
    Reddy · 2 years ago
    Hi,

    Advise me the formula for multi digit number combine to single digit

    exp: 12345 (inside one cell) autocalculate to 1+2+3+4+5 = 6