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

Condition If Cellule Fusionnée contient texte dans Boucle For Each

Créer une discussion

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
K

kevinkleinp

XLDnaute Nouveau
Bonjour tout le monde,

Pourriez vous m'aider ? j'ai un soucis avec mon code.
Je n'arrive pas à faire ma condition "si la cellule fusionnée contient le texte "Erreur" alors vider cette cellule"
et tout cela dans une boucle for each qui pointe sur la feuille "Nom_Feuille"

Code: 
   For Each Cell In Worksheets("Nom_Feuille").UsedRange.Cells
        If Cell.MergeCells = "Erreur" Then
        Cell.MergeArea.ClearContents
        Else
        End If
        Next Cell

J’espère avoir été clair 😱
N'hesitez pas à me corriger si il le faut, je débute en VBA...

Merci d'avance l'équipe 😉
 
Dernière édition:
Trier par date Trier par votes
Re : HELP : Condition If Cellule Fusionnée contient texte dans Boucle For Each

Merci Dranreb pour ta réponse 😉

Malheureusement , ça me vide les cellules "non fusionnées" + "fusionnées" "contenant "Erreur" alors que je voulais que les cellules fusionnées
Y'aurait'il un autre moyen ?

Encore merci 🙂
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Condition If Cellule Fusionnée contient texte dans Boucle For Each

VB: 
For Each Cell In Worksheets("Nom_Feuille").UsedRange.Cells
   If Cell.MergeCells Then If Cell.MergeArea(1, 1) = "Erreur" Then Cell.MergeArea.ClearContents
   Next Cell
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

T
  • Résolu(e)
Microsoft 365 Insérer une image DANS une cellule
Réponses
12
Affichages
1 K
Thomi
T
G
  • Question Question
Microsoft 365 Saut de ligne dans une cellule
Réponses
3
Affichages
774
GClaire
G
  • Question Question
XL 2016 Aide pour userform (sujet clos)
Réponses
8
Affichages
593
tactic6
XLS : Evènements souris 'click' sur la grille & astuces
Réponses
3
Affichages
410
Lu76Fer
  • Suggestion Suggestion
Texte Définir les propriétés d'une cellule ou d'un Range (couleurs, fonte, ..., valeur) dans une formule
Réponses
0
Affichages
1 K
Dudu2
V
  • Résolu(e)
Microsoft 365 VBA effacer plusieurs cellules en fonctionde la valeur d'une dans une boucle for
2 3
Réponses
39
Affichages
3 K
vincent32
V
J
  • Résolu(e)
XL 2019 Vba - boucle for each ne passe pas la premiere cellule
Réponses
9
Affichages
1 K
juicelink
J
W
  • Résolu(e)
XL 2016 VBA For Each dans un For Each
Réponses
8
Affichages
925
RF13
R
P
  • Question Question
XL 2019 VBA Erreur d'exécution "9" dans une plage de tableau
Réponses
2
Affichages
551
piskely
P
G
  • Résolu(e)
XL 2016 Définir Boucle pour afficher plusieurs tableaux dans des textbox sur une userform (ou sur une feuille Excel)
Réponses
6
Affichages
1 K
gaby.jvx
G
M
  • Résolu(e)
XL 2013 Copier/coller une plage de cellules avec conditions
Réponses
4
Affichages
1 K
mmk
M
K
  • Question Question
Microsoft 365 VBA rechercher si une cellule d'une autre feuille est vide comme condition de IF
Réponses
2
Affichages
2 K
Kyirra
K
  • Question Question
XL 2013 listbox avec + de 11 colonnes (colonne A à colonne L)
Réponses
11
Affichages
2 K
patricktoulon
N
  • Résolu(e)
XL pour MAC AIDE erreurs VBA MAC-Excel (2019)
2
Réponses
25
Affichages
3 K
job75
A
  • Question Question
XL 2016 VBA - Optimisation d'exécution d'une ligne de code [For Each Cell In Selection > IF... > Next]
Réponses
5
Affichages
1 K
zebanx
P
  • Question Question
Détecter un mot dans chaque ligne de cellule.
Réponses
14
Affichages
2 K
Pexcel
P
  • Question Question
XL 2016 Insérer le contenu d'une ListBox dans cellules
Réponses
2
Affichages
1 K
Yoyo01000
L
  • Question Question
XL 2019 Code VBA, chercher un fichier et mettre hyperlink dans cellule correspondante
Réponses
5
Affichages
1 K
laktats
L
N
  • Question Question
insertion d'un nombre variable de données dans une boucle
2
Réponses
17
Affichages
3 K
ninajams
N
D
  • Question Question
XL 2019 Copier contrôle TAG (USF vers Feuille) selon condition
Réponses
5
Affichages
987
Compte Supprimé 979
C
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…