Set listobject as ADODB object and use sql on this.

Sub tableComparator()

    Dim rst1, rst2, cmd, conn, esteLibro, wbActive, sSql
    
    Set conn = CreateObject("ADODB.Connection")
    Set rst1 = CreateObject("ADODB.RecordSet")
    Set rst2 = CreateObject("ADODB.RecordSet")
    
    
    wbActive = ActiveWorkbook.FullName
    
    sSql = "select * from [Sheet1$t_test]"
    
    conn.Open "Provider=Microsoft.ACE.OLEDB.12.0;" & _
            "Data Source='" & wbActive & "';" & _
            "Extended Properties=""Excel 12.0;HDR=Yes;"";"
            
    Set rst1 = CreateObject("ADODB.RecordSet")
    
    rst1.Open sSql, oConn, adOpenStatic, adLockReadOnly

End Sub

What reference i should use here?

"select * from [Sheet1$t_test]" --> this is not working.