Function to Split a String

[PRobinson87]

I'm trying to split a String to get, in my case, product name. I am writing the function as a reference to the full string. The strings all start with "SKU-", the Product Name, then product description.

Ex.

SKU-123ABC-Doodad

<tbody>
</tbody>

I can't simply do text to columns because some Product Names contain dashes.

Ex.
SKU-321-ABC-Doodad
|--| |-------| |-------|

Essentially, what I need to do is replace everything before the first and after the last dash with "". The replace for the first is easy, it's finding the last dash and replacing everything after that is difficult.

Anyone have any experience with this?

 

[C Moore]

If the product names and product descriptions never have dashes, then Find("-",M15,5) could work. The formula would be =MID(cell,5,FIND("-",cell,5)-5)

 

[JoeMo]

Here's a UDF you can use with an example of use below.

Function ProdNum(S As String)
Dim First As Long, Last As Long
If S = "" Then
    ProdNum = ""
    Exit Function
End If
First = InStr(S, "-") + 1
Last = InStrRev(S, "-")
ProdNum = Mid(S, First, Last - First)
End Function

Excel Workbook
	A	B
1	SKU-123ABC-Doodad	123ABC
2	SKU-321-ABC-Doodad	321-ABC
Sheet1

 

[PRobinson87]

This is great! It should give me exactly what I need. Thank you.

 

[István Hirsch]

Give this a try:

=MID(A1,5,FIND("ß",SUBSTITUTE(A1,"-","ß",LEN(A1)-LEN(SUBSTITUTE(A1,"-",""))))-5)