11-01-22 08:55 AM
Answered! Go to Answer.
11-01-22 10:50 AM
Output_Collection = (From row In Input_Collection _Group row By a = row(Field_Name).Trim.ToString Into grp = Group _Where grp.Count=1 _Select grp.ToList).SelectMany(Function(x) x).CopyToDataTable()
11-01-22 09:25 AM
SELECT * FROM [<Sheet_Name>$] WHERE [Name] IN (SELECT [Name] FROM [<Sheet_Name>$] GROUP BY [Name] HAVING COUNT (*) = 1)'var Collection_Out = Collection_In.GroupBy(item => item.Name).Where(g => g.Count() == 1).Select(g => g.Single());
11-01-22 10:03 AM
11-01-22 10:26 AM
var Collection_Out = Collection_In.GroupBy(item => item.Name).Where(g => g.Count() == 1).Select(g => g.Single());11-01-22 10:50 AM
Output_Collection = (From row In Input_Collection _Group row By a = row(Field_Name).Trim.ToString Into grp = Group _Where grp.Count=1 _Select grp.ToList).SelectMany(Function(x) x).CopyToDataTable()
11-01-22 11:15 AM
11-01-22 04:46 PM
Dim DT As New DataTable()Dim rows() As DataRowDT.Columns.Add("Column Name")DT.Columns.Add("RowIndex")DT.Columns.Add("ColumnIndex")Dim rowindex As Integer = 0Dim columnindex As Integer = 1For Each Column As DataColumn In in_DT.Columns    rows = in_DT.Select(Column.ColumnName + " Like '%" + valuetofind + "%'")    If rows.Length > 0 Then        For Each row As DataRow In rows             rowindex = in_DT.Rows.IndexOf(row)+1             Dim dr As DataRow = DT.NewRow()             dr("Column Name")= Column.ColumnName             dr("RowIndex") = rowindex             dr("ColumnIndex") = columnindex             DT.Rows.Add(dr)         Next    Else         rowindex = 0    End If    columnindex = columnindex + 1Nextout_DT = DT
12-01-22 05:52 AM
03-02-23 07:08 PM
07-02-23 08:37 AM
Output_Collection = Input_Collection.DefaultView.ToTable(True)