Discussion :

[BipBip2]

re re bonjour

je voudrais un petit code capable de supprimer le contenu de toutes les cellules d'une feuille

merci !

[Gallienus]

Excuse moi mais que sont tes cellules ? Des zones de texte, des listbox, combobox...

[leSeb]

Tu peux essayer un code qui ressemble a ca.

Code :

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

Feuil.Range("A1").ClearContents

[BipBip2]

cest juste des cellules texte

help !

[biquet]

salut,

Voici un bout de code à toi de t'en inspirer

Code :

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

1
2
3
4
'Selectionne toutes les cellules de la feuille
    Cells.Select
' Supprime toutes les cellules et les décales vers le haut
    Selection.Delete Shift:=xlUp

a+

le code du dessus supprime les cellules, si tu veux effacer le contenu des cellules tu remplaces

Code :

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

   Selection.Delete Shift:=xlUp

par la ligne de code suivante

Code :

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

Selection.ClearContents

a+

[BipBip2]

vous mavez mal compris

je sui dans une feuille "A" et je veux supprimer le contenu de la feuille "B"

[Tan]

Et bien, c'est bon quand même. Dans le code que l'on t'a donnée:

Code :

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

Feuil.Range("A1").ClearContents

il y a une variable feuil.
Cette variable est de type worksheet. Il suffit donc d'affecter ta feuille à cette variable ouplus rapidement, si la feuille s'appelle B:

Code :

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

worksheets("B").Range("A1").ClearContents

ou si tu veux supprimer la seconde:

Code :

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

worksheets(1).Range("A1").ClearContents

Salut.

[zazaraignée]

Plus radical encore :

Code :

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

Cells.Clear

Ça nettoie une feuille de calcul, ça madame! Monsieur Net n'a qu'a aller se rhabiller!