Public Function DelimElement (
DelimStr As Variant,
ElementIndex As Integer,
Optional Delimiter As String = ","
) As Variant
Return the nth element (starting at 1) of the delimited string
The 1-based index of the element required
Dim v As Variant
v = xf.Gen.DelimElement(delimiter, DelimStr, ElementIndex)
v = xf.Gen.DelimElement(delimiter, DelimStr, ElementIndex, Delimiter)
DelimElement("one,two,three,four", 3) => three