Excel Automation Duplicate Issue

Assign Activity
dtResult = dtOrig.Clone

Assign Activity
dtResult =

(From d in dtOrig.AsEnumerable
Group d by k=d("Company Code").toString.Trim into grp=Group
Let tg = String.Join("-", grp.Select(Function (g) g("Target").toString.Trim))
Let gf = grp.First()
Let ra = new Object(){gf("Company Code"),tg,gf("Update"),gf("Status") }
Select dtResult.Rows.Add(ra)).CopyToDataTable

A few adapations maybe are to do

Also have a look here: