Hi @MD_Farhan1 ,
Use below method.
dtoutput=dt.clone()
dtoutput=(From row In dt.AsEnumerable() Where Not row("Description").ToString.Trim.StartsWith("(") Let desc = row("Description").ToString.Trim Let subDesc = String.Join(",", dt.AsEnumerable().Where(Function(x) x("Description").ToString.Trim.StartsWith("(")).Select(Function(x) x("Description").ToString.Trim)) Select dtOutput.Rows.Add(desc & If(subDesc <> "", ", " & subDesc, ""), row("Quantity"), row("Rate"))).CopyToDataTable()
Regards,
Arivu