Orhan

This works for me to select the header row of a table generated with Power Query.
Dim tbl As ListObject

    Set tbl = Sheet2.ListObjects("Table_0")
    
    tbl.HeaderRowRange.Select