Please Note: This article is written for users of the following Microsoft Excel versions: 97, 2000, 2002, and 2003. If you are using a later version (Excel 2007 or later), this tip may not work for you. For a version of this tip written specifically for later versions of Excel, click here: Inserting Dashes between Letters and Numbers.

# Inserting Dashes between Letters and Numbers

Written by Allen Wyatt (last updated April 22, 2020)
This tip applies to Excel 97, 2000, 2002, and 2003

Let's say you have a worksheet with lots of product codes in column A. These codes are in the format A4, B12, AD4, etc. Due to a change in the way your company operates, you are directed to change all the product codes so they contain a dash between the letters and the numbers.

There are several ways you can perform this task. If the structure of your product codes is consistent, then inserting the dashes is a snap. For instance, if there will always be a single letter followed by numbers, then you could use a formula such as this:

```=LEFT(A1,1) & "-" & RIGHT(A1,LEN(A1)-1)
```

Chances are good that your data won't be structured, meaning you could have one or two letters followed by up to three digits. Thus, both A4 and QD284 would both be valid product codes. In this case, a solution formula takes a bit more creativity.

One way to handle it is with an array formula. Consider the following formula:

```=REPLACE(A1,MATCH(FALSE,ISERROR(1*MID(A1,ROW(INDIRECT("1:100")),1)),0),0,"-")
```

If values are in A1-A10, you can put this formula into B1, and then copy it down the column. Since it is an array formula, it must be entered by pressing Ctrl+Shift+Enter. The formula finds the location of the first number in the cell and inserts a dash before it.

Assume, for the sake of example, that cell A1 contains BR27. The innermost part of the formula, INDIRECT("1:100"), converts the text 1:100 to a range. This is used so that inserting or deleting rows does not affect the formula. The next part of the formula, ROW(INDIRECT("1:100")), essentially creates an array of the values 1-100: 1,2,3,...,99,100. This is used to act on each character in the cell.

The next part, MID(A1,ROW(INDIRECT("1:100")),1), refers to each individual character in the string. This results in the array: "B", "R", "2", and "7". Multiplying the array by 1 (the next part of the formula) results in each of the individual characters being converted to a number. If the character is not a number, this conversion yields an error. In the case of the string being converted (BR27), this results in: #VALUE, #VALUE, 2, and 7.

The next step is to apply the ISERROR function to the results of the multiplication. This converts the errors to TRUE and the non-errors to FALSE, yielding TRUE, TRUE, FALSE, and FALSE. The MATCH function looks in the array of TRUE and FALSE values for an exact match of FALSE. In this example, the MATCH function returns the number 3, since the first FALSE value is in the third position of the array. At this point, we essentially know the location of the first number in the cell.

The final function is REPLACE, which is used to actually insert the dash into the source string, beginning at the third character.

As you can tell, the formula to perform the transformation can be a bit daunting to decipher. For those so inclined, it may be easier to just create a user-defined function. The following macro is an example of one that will return a string with the dash in the proper place:

```Function DashIn(myText As String)
Dim i As Integer
Dim myCharCode As Integer
Dim myLength As Integer

Application.Volatile
myLength = Len(myText)
For i = 1 To myLength
myCharCode = Asc(Mid(myText, i, 1))
If myCharCode >= 48 And myCharCode <= 57 Then
Exit For
End If
Next i
If i = 1 Or i > myLength Then
DashIn = myText
Else
DashIn = Left(myText, i - 1) & "-" _
& Mid(myText, i, myLength - 1)
End If
End Function
```

The macro examines each character in the original string, and when it finds the first numeric character, it inserts a dash at that point. You would use the function in this way:

```=DashIn(A1)
```

Note:

If you would like to know how to use the macros described on this page (or on any other page on the ExcelTips sites), I've prepared a special page that includes helpful information. Click here to open that special page in a new browser tab.

ExcelTips is your source for cost-effective Microsoft Excel training. This tip (2613) applies to Microsoft Excel 97, 2000, 2002, and 2003. You can find a version of this tip for the ribbon interface of Excel (Excel 2007 and later) here: Inserting Dashes between Letters and Numbers.

##### Author Bio

Allen Wyatt

With more than 50 non-fiction books and numerous magazine articles to his credit, Allen Wyatt is an internationally recognized author. He is president of Sharon Parq Associates, a computer and publishing services company. ...

##### MORE FROM ALLEN

Changing Print Dialog Box Defaults

Some of the built-in defaults in Word can't be changed. Often times, however, you can work around these defaults by using ...

Discover More

Moving a Chart's Legend

Need to move a chart legend to a different place on the chart? It's easy to do using the mouse, as described in this tip.

Discover More

Printing Post Office Permits on Envelopes

When preparing to snail-mail information, you may want to print your envelopes with permit information in the upper-right ...

Discover More

Excel Smarts for Beginners! Featuring the friendly and trusted For Dummies style, this popular guide shows beginners how to get up and running with Excel while also helping more experienced users get comfortable with the newest features. Check out Excel 2013 For Dummies today!

Shortcut for Selecting a Data Range

Want to select all the data in a contiguous section of a worksheet? The shortcut discussed in this tip makes it very easy.

Discover More

Combining Multiple Rows in a Column

Do you need to concatenate the contents of a range of cells in the same column? Here's a formula and a handy macro to ...

Discover More

Ensuring Rows and Columns are Empty

Before you go about deleting rows and columns helter-skelter, it is a good idea to determine if there is anything in the ...

Discover More
##### Subscribe

FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."

If you would like to add an image to your comment (not an avatar, but an image to help in making the point of your comment), include the characters [{fig}] (all 7 characters, in the sequence shown) in your comment text. Youâ€™ll be prompted to upload your image when you submit the comment. Maximum image size is 6Mpixels. Images larger than 600px wide or 1000px tall will be reduced. Up to three images may be included in a comment. All images are subject to review. Commenting privileges may be curtailed if inappropriate images are posted.

What is 6 + 3?

2015-10-04 11:50:58

Willy Vanhaelen

@Rick Rothstein,

This is a very clever solution!
You can even make it a 'one liner' by removing 'Application.Volatile' which isn't really necessary.

2015-10-03 11:16:28

Rick Rothstein

Below is a shorter way to write the DashIn UDF that you posted. The only difference in output between our UDF's is that when an error occurs, your UDF outputs #N/A whereas mine outputs #VALUE!

<pre>
Function DashIn(myText As String)
Application.Volatile
DashIn = Application.Replace(myText, InStr(myText, Val(StrReverse(myText)) Mod 10), 0, "-")
End Function
</pre>

##### This Site

Got a version of Excel that uses the menu interface (Excel 97, Excel 2000, Excel 2002, or Excel 2003)? This site is for you! If you use a later version of Excel, visit our ExcelTips site focusing on the ribbon interface.