Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2019 Macro pour effacer une plage de cellule

Toubabou

XLDnaute Impliqué
Bonsoir à tous

Dans ma feuille « Ressources 2021 », j’ai un bouton qui me permets d’effacer certaines plages de cellules.

J’essaye de rentrer dans la macro « Efface » la commande pour effacer le contenu de cellules allant de B95 à B106 et E95 à E106. Visiblement j’ai un soucis mais je ne trouve pas quoi. Toutes les autres lignes de commande fonctionnent seul ces deux dernière.

Pourriez vous m’aider à trouver mon erreur.

Merci par avance
 

Pièces jointes

  • TEST EFFACER 01.xlsm
    23.1 KB · Affichages: 8

natorp

XLDnaute Barbatruc
Bonsoir Toubabou

Il s'agit de cellules fusionnées, reformatez les cellules en question avec "Centré sur plusieurs colonnes"
Et ça marche

Cordialement, Gérard
 

Pièces jointes

  • TEST EFFACER 01.xlsm
    23.2 KB · Affichages: 6

Eric C

XLDnaute Barbatruc
Bonsoir le forum
Bonsoir Toubabou - Oupssss, pas rafaîchi : bonsoir natorp

"ClearContents" ne fonctionne pas avec les cellules fusionnées. A remplacer par :
VB:
Sheets("Ressources 2021").Range("b95:e106").Value = ""
 Sheets("Ressources 2021").Range("e95:e106").Value = ""

Bonne soirée à toutes & à tous
@+ Eric c
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…