Macro pour mise en forme conditionnelle "valeurs en double"
Résolu
noe2008
Messages postés
184
Date d'inscription
Statut
Membre
Dernière intervention
-
noe2008 Messages postés 184 Date d'inscription Statut Membre Dernière intervention -
noe2008 Messages postés 184 Date d'inscription Statut Membre Dernière intervention -
A voir également:
- Macro pour mise en forme conditionnelle "valeurs en double"
- Mise en forme conditionnelle excel - Guide
- Double ecran - Guide
- Whatsapp double sim - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Mise en forme tableau croisé dynamique - Guide
2 réponses
Bonjour,
Une simple MFC est suffisante
Sélectionner la zone X16:AF200
ouvrir les MFC + nouvelle règle
choisir ""Utiliser une formule ......""
dans le cadre mettre cette formule =ET(X16<>"";NB.SI($X$16:$AF$200;X16)=2) (bien respecter la position du signe "$"
Choisir le couleur puis OK, OK
Cordialement
Une simple MFC est suffisante
Sélectionner la zone X16:AF200
ouvrir les MFC + nouvelle règle
choisir ""Utiliser une formule ......""
dans le cadre mettre cette formule =ET(X16<>"";NB.SI($X$16:$AF$200;X16)=2) (bien respecter la position du signe "$"
Choisir le couleur puis OK, OK
Cordialement
Bonjour,
Autre solution en VBA qui s'applique à toutes les feuilles
Cdlt
Autre solution en VBA qui s'applique à toutes les feuilles
Sub Couleur_Doublons()
Application.ScreenUpdating = False
For i = 1 To Sheets.Count
With Sheets(i).Range("X16:AF200")
.FormatConditions.AddUniqueValues
.FormatConditions(1).DupeUnique = xlDuplicate
.FormatConditions(1).Font.ThemeColor = xlThemeColorDark1 'texte blanc
.FormatConditions(1).Interior.Color = 5287936 ' fond vert
End With
Next i
End Sub
Cdlt