VBA code om filter tabel te verwijderen

[Rebby]

Hoi allemaal,
Ik wil graag middels een code ( VBA ) een tabel met filters verwijderen en de data en opmaak behouden.
Normaal doe je dat met de muis rechts in een cel van de tabel te klikken en te kiezen voor Convert to range. Maar ik zou dat graag aan een knop op het scherm via een code willen doen.
Iemand een idee??
Groet Rebby.

 

[Ad Becude]

Rebby,

Neem de handeling op met je macro recorder, en hang hem aan een knoppie

 

[Rebby]

Dag Ad,

Ja, dat dacht ik eerst ook. Maar dan blijft ie mooi leeg. Probeer 't maar eens.
Ik krijg de volgende code:

Sub VerwFilter()
'
' VerwFilter Macro
'

'
Range("A1").Select
End Sub

Daar kan ik dus niks mee. Want als ik die uitvoer gebeurt niks dan dat a1 geselecteerd wordt......

Gr. Rebby

 

[edmoor]

Gebruik hiervoor: ActiveSheet.ListObjects(1).Unlist
Uiteraard moet je dan wel weten om welk ListObject nummer het gaat.

ListObject beschrijving:
http://msdn.microsoft.com/en-us/library/office/ff839458(v=office.15).aspx

 

[Rebby]

Hoi Edmoor,

Idd het werkt. Bedankt!

Gr. Rebby