ListObject.SourceType (Excel)
Retorna um valor XlListObjectSourceType que representa a fonte atual da lista. Os valores de retorno possíveis são xlSrcExternal - Fonte de dados externa (site do Microsoft SharePoint Foundation), xlSrcModel - Modelo do PowerPivot, xlSrcQuery - Consultar, xlSrcRange - Intervalo, xlSrcXml - XMLXML.
Dim xloSourceType As XlListObjectSourceType
xloSourceType = ActiveCell.ListObject.SourceType