Placer dans une cellule du texte suivant la valeur de 2 cellules

Bonjour toutes et tous

Depuis un bon bout de temps, je recherche la formule ou par macro VBA

si le résultat de plusieurs cellules sont identiques, mettre Bravo dans la cellule A6 et/ou dans la Shape de la feuille Jeu

Placer dans une cellule A6 "BRAVO!" si résultat est correct des cellules==> N4, N6,N8,N10, N12, N14, N16 et N18<==

ou

Placer du texte "BRAVO!" dans la Shape se nommant RECINFO de la feuille Jeu

ci joints une capture+le classeur Excel

merci à vous

crdlt,

André

Salut Andre,

formule matricielle à entrer dans la céllule A6

=Si(ET(N4:N18=Q4:Q18);"Bravo";"")

à valider avec Ctrl+Maj+Entrée

Avec formule

En VBA

@++

Bonjour toutes et tous

super merci M3ellem1

les 2 avec matricielles + VBA supeeer !

avec la formule matricielle j'ai compris, je regarderai pour le VBA ce soir

Note : améliorations en VBA sur cette nouvelle version le 26 août 2019

Listepair1_test004_4_VBA.xlsm

les Shapes flèches si non placées correctement seront en rouge
les Shapes flèches bien placées une temporisation de l'application de 3 secondes pour afficher dans la Shape RECINFO "bonne réponse" , les flèches en positions correctes seront de couleurs bleues
la taille des flèches (shape) de 3pts
affichage si bien placé N6 N8 [..] et N18
affichage en plein écran du classeur (mis à false, barre de formule etc. dans le ThisWorkBook)
les Shapes flèches disparaissent si rien dans les cellules N6 N8 [..] et N18

merci à vous

crdlt,

André