Unlist Method
Removes the list functionality from a ListObject object. After you use this method, the range of cells that made up the the list will be a regular range of data. Returns Nothing.
expression .Unlist()
expression Required. An expression that returns a ListObject object.
Remarks
Running this method leaves the cell data, formatting, and formulas in the worksheet. The Total row is also left intact. This method removes any link to a Microsoft Windows SharePoint Services site. AutoFilter and the Insert row are also removed from the list.
Example
The following example removes the list features from a list on a worksheet.
Sub DeList()
Dim wrksht As Worksheet
Dim objListObj As ListObject
Set wrksht = ActiveWorkbook.Worksheets("Sheet1")
Set objListObj = wrksht.ListObjects(1)
objListObj.Unlist
End Sub