Effacer le contenu de certaines cellules non contiguës

Signaler
Messages postés
2
Date d'inscription
lundi 21 octobre 2019
Statut
Membre
Dernière intervention
22 octobre 2019
-
Messages postés
8185
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
12 septembre 2020
-
Bonjour

Je suis un peu novice dans vba et je travaille sur un projet. J'ai dans ma feuille plusieurs cellules non contiguës qui contiennent des textes dont je souhaite effacer le contenu. J'ai utiliser le code que voici mais ça marche pas trop.

Sheets("Test").Range("C33,C35,C38,C91,C93,C95,C129,C131,C134,C158,C160,C163").ClearContents


Quelqu'un peut-il m'aider svp?

D'avance merci

1 réponse

Messages postés
8185
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
12 septembre 2020
1 467
Bonjour,

Ça veux dire quoi : « ça marche pas trop » ????

Ce code fonctionne normalement, bien que la bonne syntaxe soit plutôt :
Worksheets("Test").Range("C33,C35,C38,C91,C93,C95,C129,C131,C134,C158,C160,C163").ClearContents

En effet, l'objet Sheet ne possède pas de propriété Range, c'est l'objet Worksheet qui possède la propriété Range.
Lorsque la Sheet est une Worksheet, elle hérite de la propriété Range et ça fonctionne mais il est plus sûr d’utiliser directement la Worksheet.


Cordialement
Patrice

Personne ne peut détenir le savoir, c'est pour ça qu'on le partage.
Messages postés
2
Date d'inscription
lundi 21 octobre 2019
Statut
Membre
Dernière intervention
22 octobre 2019

Merci Patrice33740 pour la réponse

Quand je dis ça marche pas trop, c'est pour dire que le code ne fonctionne pas. J'ai utilisé aussi la solution proposée mais le code ne s'exécute pas.
Excusez-moi je viens de me rendre compte que toutes ces cellules en question sont des cellules fusionnées. Y-a--il une solution?
Merci d'avance.
Messages postés
8185
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
12 septembre 2020
1 467
Rien à voir avec la fusion, si le code ne s'exécute pas c'est peut-être parce que tu n'a pas autorisé l'exécution des macros !