Here is code that opens groups where Col3="1".
Private Sub button2_Click(sender As Object, e As System.EventArgs)
Dim r As Record
For Each r In Me.gridGroupingControl2.Table.Records
If r.GetValue("Col3").ToString() = "1" Then
Dim el As Element = r
While Not (el.ParentGroup Is Nothing)
el.ParentGroup.IsExpanded = True
el = el.ParentGroup
End While
Console.WriteLine(r.ToString())
End If
Next r
Me.gridGroupingControl1.Table.InvalidateSummariesBottomUp()
Me.gridGroupingControl1.TableControl.Refresh()
End Sub ''button2_Click