ListObject.SharePointURL (Excel)

Returns a String representing the URL of the SharePoint list for a given ListObject object.

Accessing this property generates a run-time error if the list is not linked to a SharePoint site.

Dim strSharePointURL As String
strSharePointURL = ActiveCell.ListObject.SharePointURL