Discussion :

[eliot.raymond]

Bonjour a toutes et tous, Forum bonjour

Comment svp effacer plusieurs colonnes en une seule fois, juste effacer le contenu des cellules PAS le format NI les formules.

Par Exemple; effacer (B3:B3000 AD1:AD3000 AG1:AH3000)

Merci a vous et de votre temps et bonne journée

Raymond

[mapeh]

Bonjour,

Peut-être ainsi :

Code :

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

    Range("B3:B3000, AD1:AD3000, AG1:AH3000").SpecialCells(xlCellTypeConstants, 23).ClearContents

Bonne journée

[eliot.raymond]

Bonsoir tous le monde,Forum

Bonsoir mapeh

Merci pour ta réponse avec ton code j'ai pu effacer d'autres colonnes également.


Juste un petit renseignement et je cloture le chiffre 23 dans le code ca veut dire quoi si te plait

Code :

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

SpecialCells(xlCellTypeConstants, 23).ClearContents

Voila merci a toi et la bonne soirée

Raymond

[mapeh]

Re-,

L'enregistreur de macro est ton meilleur ami...

Ce code équivaut à Edition/Atteindre (ou F5), clic sur "Cellules", et ensuite on choisit le type de cellules qu'on veut sélectionner..

Pour les constantes, 1 signifie "Nombre", 2 "Texte", 4 "Valeurs Logiques", 16 "Valeurs d'erreur" et 23 l'ensemble de ces constantes. (Soit la somme des constantes... Si tu veux les nombres et les textes, tu mets 3.....)

Bonne soirée

[eliot.raymond]

Re mapeh

Re merci pour ta réponse rapide, j'ai imprimer pour mes archives, et je vais regarder ca de près.

Bonne soirée et bon Dimanche également

Merci Raymond