Delete ALL ListObjects
 

When I import an XML file in Excel 2003 it creates a listobject

'List1'

but in Excel 2007 it creates a listobject

'Table1'

An in my code I unlist the list but since the name changes
(ActiveSheet.ListObjects("Table1").Unlist),..., I don't know how to handle
it. As such, how can I made a more generic code to unlist any and an
listobject found.

Thank you,

QB

Delete ALL ListObjects
 

If you active cell is in the Table you can use

ActiveCell.ListObject.Unlist



--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm




"QB" wrote in message ...
When I import an XML file in Excel 2003 it creates a listobject

'List1'

but in Excel 2007 it creates a listobject

'Table1'

An in my code I unlist the list but since the name changes
(ActiveSheet.ListObjects("Table1").Unlist),..., I don't know how to handle
it. As such, how can I made a more generic code to unlist any and an
listobject found.

Thank you,

QB

Delete ALL ListObjects
 

Found one possible solution

http://www.microsoft.com/office/comm...4-f339561d1a29

QB





"QB" wrote:

When I import an XML file in Excel 2003 it creates a listobject

'List1'

but in Excel 2007 it creates a listobject

'Table1'

An in my code I unlist the list but since the name changes
(ActiveSheet.ListObjects("Table1").Unlist),..., I don't know how to handle
it. As such, how can I made a more generic code to unlist any and an
listobject found.

Thank you,

QB