ListObject.QueryTable (Excel)

Returns the QueryTable object that provides a link for the ListObject object to the list server.

Dim qrytblQueryTable As QueryTable
Set qrytblQueryTable = ActiveCell.ListObject.QueryTable