Split datarow based on specific string character

[kmilo_de_los_santos]

Hi team could you help me with this topic. I have a datatable (input, see image below), and I require to get the output(see image below), i am trying to split the datatable based on space,enter or any other delimiter to get that result

I’m using this code in a invoke code activity but it doesn’t retrieve the expected output

Dim dtResult As DataTable = dtOriginal.Clone()

For Each row As DataRow In dtOriginal.Rows
’
Dim values As String() = row.ItemArray.Select(Function(x) x.ToString().Split(" "c)).SelectMany(Function(x) x).ToArray()

For i As Integer = 0 To values.Length - 1 Step dtOriginal.Columns.Count
    dtResult.Rows.Add(values.Skip(i).Take(dtOriginal.Columns.Count).ToArray())
Next

Next

[Yoichi]

HI,

How about the following?

dtResult = dt.AsEnumerable.SelectMany(Function(r) Enumerable.Range(0,r(0).ToString.Split(" "c).Count).Select(Function(i) dt.Clone.LoadDataRow(dt.Columns.Cast(Of DataColumn).Select(Function(dc) r(dc).ToString.Split(" "c)(i)).ToArray,False))).CopyToDataTable()

Sample
Sample20240321-1.zip (9.1 KB)

Note: this sample assumes all the cell in same row has same number of items.

Regards,

[kmilo_de_los_santos]

Thanks very much @Yoichi , that is exactly what I require. That answer is brilliant