Effacer lignes tableau

Rebonjour

j'ai un feuille "facturation " avec un tableau structuré " TFACT "

au debut mon tableau contient les entêtes et une 1 ere ligne vide.

j aliment ma facture avec les données via un userform

une fois sauvegardée. je souhaite supprimer toutes les lignes et mon tableau retrouve l état initial cad les entêtes et la 1 ere ligne vide.

comment faire???

Bonsoir kerkenianes, le forum,

A tester :

Sheets("facturation").ListObjects("TFact").DataBodyRange.Delete

Cordialement,

Bonjour,

Une autre proposition.

Si bug, ajouter nom de feuille !...

With Range("TFACT").ListObject
If Not .DataBodyRange Is Nothing Then .DataBodyRange.Delete
End With  

Cdlt.

Bonjour…

en utilisant les propriétés sans connaître la syntaxe dédiée à ce type de tableau donc syntaxe de base (classe Range) et sans se préoccuper du module où l’écrire :

If Application.CountA([Tfact]) > 0 Then [Tfact].Delete

Remarque : l’éditeur de macro est utile mais souvent trop bavard

merci infiniment . que du bonheur