How to convert EXCEL table?

Hi,

How about the following?

dtResult = dt.AsEnumerable.SelectMany(Function(r) Enumerable.Range(1,3).Select(Function(i) dtResult.LoadDataRow({"",r("Company"),r("Code")}.Concat( r("Employee ("+i.toString+")").ToString.Split({"/"c})).ToArray,False))).Where(Function(r) Not String.IsNullOrEmpty(r("Employee Name").ToString)).CopyToDataTable

Sample20230421-2Lv2.zip (21.2 KB)

Regards,

1 Like