colorier une cellules si renseigner

[creolia]

Bonsoir je souhaite colorier une formule si il est renseigner et si il n'est pas ou plus renseigner qu'il n'est plus de couleur j'ai trouver en charchant un peut ce code qui colorie la cellules mais si celui si n'est plus renseigner il reste colorier

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    For i = 1 To ActiveSheet.UsedRange.Rows.Count
        If Cells(i, 1) <> "" Then
            If Cells(i, 1) = "" Then
                Cells(i, 1).Interior.Color = RGB(2, 2, 255)
            End If
        ElseIf Cells(i, 1) <> "" Then
            If Cells(i, 1) = "" Then
                Cells(i, 1).Interior.Color = RGB(3, 3, 3)
            End If
        End If
    Next


End Sub

merci pour votre aide

 

[bigmousse]

Re : colorier une cellules si renseigner

Salut
et pourquoi tu n'utilise pas une mise en forme conditionnelle??
Mousse

 

[Tibo]

Re : colorier une cellules si renseigner

Bonsoir,

Pourquoi ne pas passer par une Mise en Forme Conditionnelle ?

Par exemple, en sélectionnant de A1 à ...

Format - Mise en forme conditionnelle - La formule est - =A1<>""

+ Format - choix couleur

@+

Edit : Bing ! Salut Bigmousse

@+

 

[creolia]

Re : colorier une cellules si renseigner

bonsoir oui j'y est penser le soucis c'est que je ne sais pas quoi entrée comme formule pour faire si cellules est renseigner puis choisir ma couleur

donc j'ai tenter la methode macro

maintenant si ta une idée sur la formule a attribuer a savoir que c'est des lettre et nom des chiffres qui renseignerons les cellules je suis preneur merci

 

[bigmousse]

Re : colorier une cellules si renseigner

Je ne comprends pas, je joint un exemple et dis moi si c'est ça
à+

 

[creolia]

Re : colorier une cellules si renseigner

SOLUTION TROUVER


MFC formule V5>0

et la couleur

merci tout de meme

 

[bigmousse]

Re : colorier une cellules si renseigner

voilà le fichier et dis moi