excel - Transforming multiple entries in a cell into multiple rows

Question

I have an excel file with the names of bands and their genre.

Column A: bandname. Column B: genre.

The b column might contain multiple entries such as "pop/rock". I would want to split that into two rows.

Example:

• [1] Awesomeband | Pop/Rock

would be transformed to

• [1] Awesomeband | Pop
• [2] Awesomeband | Rock

How would I realise that within excel? Any clues? Thanks in advance.

Answer 1

Highlighting Column B and running this VBA should do the trick:

Sub bandsplit()
Dim c As Range
Dim splitv() As String

For Each c In Selection
    splitv = Split(c.Value, "/")
    If UBound(splitv) > 0 Then
        c.EntireRow.Insert
        c.Offset(-1, 0).Value = splitv(1)
        c.Offset(-1, -1).Value = c.Offset(0, -1).Value
        c.Value = splitv(0)
    End If
Next c
End Sub

It's restricted to 2 genres but you could hack it to add more.