Selezionare ultima riga di un DataGrid

[zorro77]

è che non riesco proprio a farlo funzionare
nel senso che faccio la query, mi crei un RS, tutti i valori del RS li meto nel datagrid, ma poi non riesco proprio a capire come usare la variabile res di tipo Variant e il relativo bookmark

        Dim conn As ADODB.Connection
        Dim rsDataGrid As Recordset
        Dim StrSQL As String
        StrSQL = "SELECT * FROM TAB1 WHERE ID='" & txtFields(0).Text & "' ORDER BY ID"
        Call GetRecordset(StrSQL, ConnString, conn, rsDataGrid)
        Set grdDataGrid.DataSource = rsDataGrid


        Dim res As Variant
        
    
        If rsDataGrid.RecordCount > 0 Then
            res = rsDataGrid.RecordCount
            grdDataGrid.Bookmark = res
            grdDataGrid.SelBookmarks.Add (res)

        End If