Alerte si cellule ne remplit pas condition?

Bonjour,

Sur une colonne B j'ai des code de 21 chiffres,

Mon objectif est d'avoir une alarme sous forme de cellule colorées en rouge ou autre si elle contient un code qui porte moins ou plus de 21 caractères "chiffres, lettres, zéro, vide comprises"

Merci d'avance.

Bonjour Zagalo,

Essaye ça en macro :

Sub TestCode21()

For i = 2 To Cells(Rows.Count, 2).End(xlup).Row
    If Len(Cells(i, 2)) <> 21 Then
        With Cells(i, 2).Interior
            .Pattern = xlSolid
            .PatternColorIndex = xlAutomatic
            .Color = 255
            .TintAndShade = 0
            .PatternTintAndShade = 0
        End With
    Else
        With Cells(i, 2).Interior
            .Pattern = xlNone
            .TintAndShade = 0
            .PatternTintAndShade = 0
        End With
    End If
Next i

End Sub

Et soit tu fais un bouton, soit tu associes la macro à un évènement du style SheetSelectionChange

Et sinon, tu dois pouvoir bidouiller un truc en MeF (mise en forme) conditionnelle, il faut juste trouver la fonction Excel qui compte les caractères!

Bon courage

Bonjour,

Une simple MFC devrait faire l'affaire.

  • Sélectionne les cellules concernées
  • Vas dans Format / Mise en forme conditionnelle
  • choisis l'option "La formule est"
  • En B1 colle cette formule --> =OU(NBCAR($B1)<21; NBCAR($B$1)>21)
  • Clique sur le bouton Format et choisis le motif rouge
  • Recopie la mise en forme sur les autres cellules

Amicalement

Bonjour,

ça marche très bien,

vous remercie infiniment Reuk, Dan

Cdrt

Toujours aussi costaud ce Dan!^^

Faut que je lache le VBA et me mette sérieusement à Excel!

Rechercher des sujets similaires à "alerte remplit pas condition"