OK so I have two different data sets.
Set one the largest string count is three. Using the union function I used this VBA I found:
Public Function ParseText(TextIn As String, X) As Variant
On Error Resume Next
Dim var As Variant
var = Split(TextIn, ";", -1)
ParseText = var(X)
End Function
I...