Microsoft 365 Effacer Données de TABLEAU

[eric72]

Bonjour à tous les passionnés,
J'ai un fichier avec 3 tableaux structurés, j'aimerais pouvoir effacer les données de la colonne "Pointage Inventaire" de chaque tableau, j'ai récupéré un code qui fonctionne pour le 1er tableau mais je ne sais pas comment l'appliquer aux deux autres
Quelqu'un a-t-il une solution.
Merci beaucoup à tous pour votre dévouement.
Eric

 

[sylvanu]

Bonjour Eric,
Essayez :

Sub EffacerInventaire()
    Range("BaseDeDonnees[Pointage inventaire]").ClearContents
    Range("BaseDeDonneesPP[Pointage inventaire]").ClearContents
    Range("BaseDeDonneesPF[Pointage inventaire]").ClearContents
End Sub

 

[eric72]

Bonjour Sylvanu,
Pourquoi faire compliqué quand on peut faire simple!!!
Merci beaucoup pour votre aide...
Bonne soirée
Eric