How to quickly remove dashes from cells in Excel?
Supposing there is a list of zip codes or long ISBN numbers in your worksheet cells, and the long numbers contain dashes, for some purpose, you need to get rid of the dashes between the numbers (as following screenshots show). Are there any quick ways to remove these dashes between the numbers in excel?
Recommended Productivity Tools for Excel/Office
With this SUBSTITUTE function, the numbers will be converted to text values, so when you remove the dashes, neither the leading 0 will be removed nor the numbers will become scientific notation. Please do as follows:
1. In an adjacent blank cell, C1 for instance, enter this formula: =SUBSTITUTE(A1,"-",""), see screenshot:
2. Press Enter key, and select cell C1, then drag the fill handle to the range that you want to contain this formula. And the dashes between the numbers have been removed. See screenshot:
With the following VBA code, you can also remove the dashes between the numbers from a range of cells.
1. Highlight the range that you want to remove the dashes.
2. Hold down the ALT + F11 keys to open the Microsoft Visual Basic for Applications window.
3. Click Insert > Module, and paste the following code in the Module window.
VBA: remove dashes between numbers
Sub DeleteDashes() 'Update 20130907 Dim rng As Range Dim WorkRng As Range On Error Resume Next xTitleId = "KutoolsforExcel" Set WorkRng = Application.Selection Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8) Application.ScreenUpdating = False For Each rng In WorkRng rng.NumberFormat = "@" rng.Value = VBA.Replace(rng.Value, "-", "") Next Application.ScreenUpdating = True End Sub
4. Then press F5 key to run this code, and a dialog is popped out to tell you select a range that you want to use. See screenshot:
5. And then click OK, the dashes between the numbers have been removed from the cells. And the number format is converted to text format. See screenshots:
If you are an Excel beginner, both the formula and the code are difficult for you, please don’t worry, the Kutools for Excel’s Remove Characters function can help you quickly delete the dashes from the cells.
|Kutools for Excel : with more than 300 handy Excel add-ins, free to try with no limitation in 60 days.|
1. Select the range which cells you need to remove dashes, and then click Kutools > Text > Remove Characters, see screenshot:
2. In the Remove Characters dialog box, check Custom option, and type “-”character into the text box, then you can preview the results from the Preview Pane. Then click the OK button to remove all dashes in selected cells. See screenshot:
Note. If the selected cells contain leading zeros or lots of digits, for keeping the leading zeros and avoiding the number become scientific notation after removing the dashes, you need to format the cells as Text as below screenshot shown before applying the Remove Characters utility.
Kutools for Excel includes more than 300 handy Excel tools. Free to try with no limitation in 60 days. Download the free trial now!
- Remove alpha characters from cells
- Remove non numeric characters from cells
- Remove numeric characters from cells
- Remove non-printable characters from cells
- Remove non-alpha characters from cells
- Quickly remove line breaks
- Remove non-alphanumeric characters
Recommended Productivity Tools
Bring handy tabs to Excel and other Office software, just like Chrome, Firefox and new Internet Explorer.
Amazing! Increase your productivity in 5 minutes. Don't need any special skills, save two hours every day!
300 New Features for Excel, Make Excel Much Easy and Powerful:
- Merge Cell/Rows/Columns without Losing Data.
- Combine and Consolidate Multiple Sheets and Workbooks.
- Compare Ranges, Copy Multiple Ranges, Convert Text to Date, Unit and Currency Conversion.
- Count by Colors, Paging Subtotals, Advanced Sort and Super Filter,
- More Select/Insert/Delete/Text/Format/Link/Comment/Workbooks/Worksheets Tools...
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
To post as a guest, your comment is unpublished.· 7 months agothis and the concatenate command have saved my brain from melting! thank you!
To post as a guest, your comment is unpublished.· 2 years agoSub DeleteDashes()
Dim rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
For Each rng In WorkRng
rng.NumberFormat = "@"
rng.Value = VBA.Replace(rng.Value, "-", "")
Application.ScreenUpdating = True
To post as a guest, your comment is unpublished.· 3 years agounimpressed with your instructions - using the =SUBSTITUTE formula above, the leading zeros are stripped
To post as a guest, your comment is unpublished.· 3 years agoTHANK YOU EXTEND OFFICE IT'S VERY HELPFUL AND SIMPLE.. KUDOS!
To post as a guest, your comment is unpublished.· 4 years agoUse the find and replace feature. (Ctrl + F, click the replace tab). Enter "-" Into the find field (or whatever you're trying to remove) and hit the replace button. Make sure you leave the "Replace with" field blank.