OVH Cloud OVH Cloud

Not(doublons)

1 réponse
Avatar
claudy
Bonsoir...
Je suis à la recherche d'un bout de code....
Dans une "Plage" nommée, deux colonnes: Recettes et Dépenses
si, une cellule de mes entrées ( Recettes) ne trouve pas son correspondant
dans ma colonne Dépenses, ou l'inverse, colorier en rouge(Exemple)
Merci
a+
Claudy
--
\\\ ////
( O O )
------oOOo-(_)-oOOo-----------------
Claudy

--------------Oooo------------------
oooO ( )
( ) ) /
\ ( (_/
\_)

1 réponse

Avatar
claudy
ok j'ai trouvé:

For Each c In Range("Plage")

If Not (Application.CountIf(Range("Plage"), c.Value) > 1) Then
c.Interior.ColorIndex = 35
End If
Next
'évidemment
Bonne soirée
Claudy

"claudy" a écrit dans le message
de news: 4159abb2$0$853$
Bonsoir...
Je suis à la recherche d'un bout de code....
Dans une "Plage" nommée, deux colonnes: Recettes et Dépenses
si, une cellule de mes entrées ( Recettes) ne trouve pas son correspondant
dans ma colonne Dépenses, ou l'inverse, colorier en rouge(Exemple)
Merci
a+
Claudy
--
////
( O O )
------oOOo-(_)-oOOo-----------------
Claudy

--------------Oooo------------------
oooO ( )
( ) ) /
( (_/
_)