Effacer le contenu de certaines cellules non contiguës

Fermé
SAM_25 Messages postés 2 Date d'inscription lundi 21 octobre 2019 Statut Membre Dernière intervention 22 octobre 2019 - 21 oct. 2019 à 23:41
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 - 22 oct. 2019 à 00:55
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

Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 775
Modifié le 22 oct. 2019 à 00:18
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.


0
SAM_25 Messages postés 2 Date d'inscription lundi 21 octobre 2019 Statut Membre Dernière intervention 22 octobre 2019
22 oct. 2019 à 00:28
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.
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 775
Modifié le 22 oct. 2019 à 00:56
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 !
0