Discussion :

[vinssieux]

Bonjour , j'ai différents tableaux sur ma feuille excel avec différentes valeurs, je voudrais effacer le contenu de tous les tableaux lors de l'appuie sur un bouton.
Merci

[ptitepo]

Bjr,
Tu choisi la page, puis la zone à effacer et voila
Pour effacer le texte

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Sheets("feuil1").Select
Range("D16:D35").Select
Selection.ClearContents

ou pour effacer les couleur

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range("D16:D35").Interior.ColorIndex = xlNone

J'espere ca t'aidera

[fring]

Bonjour,

Une solution serait de nommer chaque plage de tes tableaux :
Sélectionner la plage et dans la fenêtre "zone nom" (en haut à gauche) introduire un nom pour la plage de cellules.

Par exemple 3 tableaux dont j'ai renommé les plages de cellules Tab1, Tab2 et Tab3, ce qui donne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Range("Tab1, Tab2, Tab3").ClearContents

[ouskel'n'or]

Ou une réponse donnée ici par Bevan

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Sheets("feuil1").Range("D16:D35").ClearContents

Le mieux étant toujours d'éviter les select.

[vinssieux]

Merci pour vos réponses rapides

PS : en plus ça fonctionne comme par magie ^^