Microsoft 365 Effacer contenu d'un tableau après archivage

[Piment]

Bonjour à tous,
Avant tout je tiens à remercier le Forum pour toute l'aide que l'on m'a apporté.
Petit à petit j'avance dans mon projet.
Je suis de nouveau dans une impasse, je voudrais lorsque je quitte l'Userform DEVIS effacer le contenu du tableau qui se trouve juste après la "date évènement".
Cela me permettait de créer un nouveau devis.
Je joint le fichier.
Merci pour votre aide.

 

[Dudu2]

Bonjour,
Je ne vois pas le problème. C'est un tableau structuré donc:
ActiveSheet.ListObjects("Devis").DataBodyRange.Delete.

 

[Piment]

Bonjour Dudu2,
Je te remercie d'avoir répondu à ma demande.
Mais, après avoir repris ton code dans la code du bouton quitter de l'UserForm Devis, il m'indique" erreur de syntaxe".
J'ai essayé de comprendre, mais rien à faire.
Peux-tu y jeter un oeil et m'éclairer.
Merci d'avance.

 

[Dudu2]

Bonjour,
Le '.' final termine la phrase. Je l'enlève parce que ça té confusé:
ActiveSheet.ListObjects("Devis").DataBodyRange.Delete

 

[Piment]

J'aurais du le voir.
Je sors d'une opération. J'ai l'esprit encore embué.
J'avais bien compris ton code, mais je n'avais pas vu que j'avais mis un point à la fin du code.
J'aurais pu chercher encore longtemps.
Merci beaucoup cela va me permettre d'avancer un peu.