XL 2010 comparaison de plusieurs cellules

Créer une discussion
Répondre

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
R

RIVOIRA

XLDnaute Nouveau
Bonjour à tous,

voilà ma problématique.
Je souhaite savoir s'il existe une astuce pour faire un comparaison avec plusieurs cellules

La première cellule concerne un ensemble de chiffres, regroupé dans cette même cellule (BA11)
les deux autres concernent un seul chiffre (AD11 & AE 11)

l'idée est d'afficher un résultat "VRAI" dans une autre cellule (BD11), si et seulement si :
-Celle-ci comporte un chiffre similaire avec la première autre cellule
- Cette même cellule comporte un chiffre similaire avec la deuxième autre cellule.

Le point qui sépare les deux chiffres est à extraire.

J'espère que cela est claire, et je vous joins un fichier qui aide à la compréhension

Je vous remercie par avance et vous souhaite une bonne journée

Gilles
 

Pièces jointes

  • gg.pdf
    gg.pdf
    33.7 KB · Affichages: 7
Trier par date Trier par votes
Bonjour RIVOIRA, le forum,
RIVOIRA à dit:
J'ai encore un autre pb. Quand je modifie la cellule AG11 (par exemple je transforme 8 en 5), j'ai un bon résultat sur la cellule BD11 ("VRAI"), mais tout le résultat de la colonne BC se transforme.
Pouvez-vous m'éclaircir ?
Cliquez pour agrandir...
La formule en BC11 dépend de DP19 et EB6.

Ces 2 cellules contiennent des formules EQUIV qui dépendent de AF11 et AG11.

A+
 
Vote positif 0 Vote négatif
Ah! bien sur. Merci encore pour l'information.
Encore un dernière chose. J'aimerais comparer deux cellules qui comporte deux chiffres dans chacune d'elle, separé par un "/".
j'aimerais afficher un résultat "VRAI" si au moins l'un des deux chiffres d'une cellules est similaire à l'autre chiffre de l'autre cellule.
Il peut potentiellement y a voir qu'un seul chiffre sur un des 2 cellules.

Je vous joins un fichier

Merci encore
 

Pièces jointes

Vote positif 0 Vote négatif
RIVOIRA à dit:
Ah! bien sur. Merci encore pour l'information.
Encore un dernière chose. J'aimerais comparer deux cellules qui comporte deux chiffres dans chacune d'elle, separé par un "/".
j'aimerais afficher un résultat "VRAI" si au moins l'un des deux chiffres d'une cellules est similaire à l'autre chiffre de l'autre cellule.
Il peut potentiellement y a voir qu'un seul chiffre sur un des 2 cellules.

Je vous joins un fichier

Merci encore
Cliquez pour agrandir...
Bonjour,
Essayez ceci :
VB: 
=OU(GAUCHE(A6;TROUVE("/";A6)-1)=GAUCHE(B6;TROUVE("/";B6)-1);STXT(A6;TROUVE("/";A6) +1; NBCAR(A6)-TROUVE("/";A6))=STXT(B6;TROUVE("/";B6) +1; NBCAR(B6)-TROUVE("/";B6)))
Cordialement,
 
Vote positif 0 Vote négatif
@Gégé-45550 il faut traiter les cas où il n'y a pas de slash / (nombre isolé).

Avec une fonction VBA c'est très simple :
VB: 
Function Comparer(x1$, x2$) As Boolean
Dim s1, s2, ub%, i%
s1 = Split(x1, "/")
s2 = Split(x2, "/")
ub = Application.Min(UBound(s1), UBound(s2))
For i = 0 To ub
    If s1(i) = s2(i) Then Comparer = True: Exit Function
Next
End Function
 

Pièces jointes

Vote positif 0 Vote négatif
job75 à dit:
@Gégé-45550 il faut traiter les cas où il n'y a pas de slash / (nombre isolé).

Avec une fonction VBA c'est très simple :
VB: 
Function Comparer(x1$, x2$) As Boolean
Dim s1, s2, ub%, i%
s1 = Split(x1, "/")
s2 = Split(x2, "/")
ub = Application.Min(UBound(s1), UBound(s2))
For i = 0 To ub
    If s1(i) = s2(i) Then Comparer = True: Exit Function
Next
End Function
Cliquez pour agrandir...
Par formule, c'est une seule ligne, certes un peu longue ...
VB: 
=SI(ESTERREUR(TROUVE("/";A6));SI(A6=B6;"VRAI";"FAUX");SI(ESTERREUR(TROUVE("/";B6));SI(A6=B6;"VRAI";"FAUX");OU(GAUCHE(A6;TROUVE("/";A6)-1)=GAUCHE(B6;TROUVE("/";B6)-1);STXT(A6;TROUVE("/";A6) +1; NBCAR(A6)-TROUVE("/";A6))=STXT(B6;TROUVE("/";B6) +1; NBCAR(B6)-TROUVE("/";B6)))))
😉
 
Vote positif 0 Vote négatif
RIVOIRA à dit:
Merci Beaucoup, mais toutes les combinaisons ne sont pas valides (voir fichier joint)
Cliquez pour agrandir...
Comme ça ?
VB: 
=OU(SIERREUR(DROITE(A6;NBCAR(A6)-TROUVE("/";A6&"/"));CTXT(A6;0))=SIERREUR(DROITE(B6;NBCAR(B6)-TROUVE("/";B6&"/"));CTXT(B6;0));SIERREUR(GAUCHE(A6;TROUVE("/";A6&"/")-1);CTXT(A6;0))=SIERREUR(GAUCHE(B6;TROUVE("/";B6&"/")-1);CTXT(B6;0));SIERREUR(DROITE(A6;NBCAR(A6)-TROUVE("/";A6&"/"));CTXT(A6;0))=SIERREUR(GAUCHE(B6;TROUVE("/";B6&"/")-1);CTXT(B6;0));SIERREUR(GAUCHE(A6;TROUVE("/";A6&"/")-1);CTXT(A6;0))=SIERREUR(DROITE(B6;NBCAR(B6)-TROUVE("/";B6&"/"));CTXT(B6;0)))
Cordialement,
 

Pièces jointes

Vote positif 0 Vote négatif
Là le VBA est bien utile :
VB: 
Function Comparer(x1$, x2$) As Boolean
Dim s1, s2, ub%, i%, j%
s1 = Split(x1, "/")
s2 = Split(x2, "/")
ub = UBound(s2)
For i = 0 To UBound(s1)
    For j = 0 To ub
        If s1(i) = s2(j) Then Comparer = True: Exit Function
Next j, i
End Function
Bonne nuit.
 

Pièces jointes

Vote positif 0 Vote négatif
job75 à dit:
Là le VBA est bien utile :
VB: 
Function Comparer(x1$, x2$) As Boolean
Dim s1, s2, ub%, i%, j%
s1 = Split(x1, "/")
s2 = Split(x2, "/")
ub = UBound(s2)
For i = 0 To UBound(s1)
    For j = 0 To ub
        If s1(i) = s2(j) Then Comparer = True: Exit Function
Next j, i
End Function
Bonne nuit.
Cliquez pour agrandir...
Merci Beaucoup, job75. Ca fonctionne très bien. Je me permettrais de revenir vers vous un peu plus tard, sur la ppartie vba justement.

Bonne journée
 
Vote positif 0 Vote négatif
RIVOIRA à dit:
Merci Beaucoup, job75. Ca fonctionne très bien. Je me permettrais de revenir vers vous un peu plus tard, sur la ppartie vba justement.

Bonne journée
Cliquez pour agrandir...
Bonjour,
Nous n'avons été que deux à répondre à vos questions et j'ai été d'assez loin le premier, me semble-t-il.
Que vous préfériez la solution hyper propre de l'excellent job75 => aucun problème.
Toutefois j'aurais apprécié une réponse ou un commentaire sur la proposition du post #24.
À votre prochaine question, soyez-en sûr, je passerai mon chemin.
Cordialement,
 
Vote positif 0 Vote négatif
Gégé-45550 à dit:
Bonjour,
Nous n'avons été que deux à répondre à vos questions et j'ai été d'assez loin le premier, me semble-t-il.
Que vous préfériez la solution hyper propre de l'excellent job75 => aucun problème.
Toutefois j'aurais apprécié une réponse ou un commentaire sur la proposition du post #24.
À votre prochaine question, soyez-en sûr, je passerai mon chemin.
Cordialement,
Cliquez pour agrandir...
Bonjour ,

je suis désolé, de ne vous avoir pas répondu. Veuillez m'excuser, par rapport au temps que vous avez passé. Je n'ai pas trop l'habitude d'utiliser les forums.
Dorénavant, même si vous passez votre tour, je serais beaucoup plus vigilent à répondre à tous le monde.

Avec mes excuse encore une fois
 
Vote positif 0 Vote négatif
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

W
  • Résolu(e)
XL 2019 Somme d'éléments (retours à la ligne) dans un segment, ou plusieurs segments, horizon·tal·aux de cellules
Réponses
2
Affichages
101
Webperegrino
W
S
  • Résolu(e)
XL 2021 "Blocage de la mise a jour d'une cellule"
Réponses
8
Affichages
180
Steph733
S
S
  • Résolu(e)
Microsoft 365 VBA Concaténer contenu de plusieurs cellules dans une seule avec séparateurs / évolutifs
Réponses
3
Affichages
300
spike29
S
T
  • Question Question
XL 2021 Additionner la couleur du fond et la police de plusieurs cellule en vba
Réponses
7
Affichages
457
Tophe2
T
R
  • Question Question
XL 2010 Copie de plusieurs plages de cellules spécifiques dans le presse-papier
2
Réponses
20
Affichages
463
Dranreb
Dranreb
G
  • Question Question
XL 2016 Comment concaténer plusieurs dates (provenant d'une formule) de différentes cellules en une seule cellule?
Réponses
4
Affichages
301
JHA
J
M
  • Question Question
Microsoft 365 Calcul du nombre de chiffres dans une cellule. Mise en page d'un fichier.
Réponses
2
Affichages
428
MCOTTEND
M
A
  • Question Question
Microsoft 365 INDEX+EQUIV dont le resultat duplique les lignes par erreur
Réponses
5
Affichages
309
aeca
A
N
  • Question Question
Microsoft 365 Affichage information de plusieurs cellules à partir d'une seule
Réponses
8
Affichages
307
narkoleptik
N
A
  • Question Question
Microsoft 365 Macro pour recherche de cellules entre 2 fichiers Excel
Réponses
7
Affichages
189
AtTheOne
AtTheOne
E
  • Résolu(e)
XL 2016 Verrouiller page avec accès "filtre" + "mise en page personnalisée"
Réponses
9
Affichages
282
Phil69970
Phil69970
D
  • Question Question
XL 2016 Une Zone de Liste pour plusieurs cellules.
Réponses
7
Affichages
311
duduche62
D
L
  • Question Question
Microsoft 365 Comparer le texte de deux colonnes (plusieurs mots/cellule) pour trouver 1 mot en commun
2 3
Réponses
37
Affichages
4 K
Staple1600
Staple1600
L
  • Question Question
Microsoft 365 KPI - Performance Commerciale
Réponses
2
Affichages
705
laurabachau
L
R
  • Résolu(e)
XL 2019 Comment extraire séparément plusieures chaines de caractères ou chiffres/nombres depuis une cellule avec libellé complexe alpha numérique
2
Réponses
28
Affichages
1 K
Renardy
R
L
  • Résolu(e)
Microsoft 365 Aide : Colorer une cellule en fonction de sa valeur
Réponses
2
Affichages
451
Leo98
L
edgy63
  • Question Question
Microsoft 365 Remplir cellules à partir de plusieurs fichiers Excel d'un dossier
2
Réponses
17
Affichages
723
alexga78
A
W
  • Résolu(e)
XL 2016 Ordonner une cellule ou un pavé de cellules contenant des chr(10)
Réponses
5
Affichages
619
Webperegrino
W
M
  • Résolu(e)
XL 2013 Macross supprimant les données de cellule en dehors d'une période définie dans deux autres cellules
Réponses
9
Affichages
631
MarineU
M
Z
  • Question Question
XL 2016 Macro pour copier plusieurs cellules vers un fichier :(
Réponses
3
Affichages
410
zendb
Z
Retour