XL 2010 Macro ajouter un caractère si couleur de remplissage est rouge

[Elodie195]

Bonjour,

Je sollicite votre aide pour une macro Excel.
Je ne sais pas du tout si elle est réalisable.

J'ai une unique colonne avec des résultats chiffrés.
Certains ont une couleur de remplissage rouge.

Peut-on par le biais d'une macro Excel ajouter la lettre F derrière les valeurs chiffrées dont la case est rouge ?

J'ai mis un fichier exemple (j'ai également ajouté un onglet "a_obtenir")

Merci de votre aide.

Bonne journée.

 

[Lolote83]

Sub RajouteFCouleurRouge()
    For Each xCell In Range("A1:A11")
        If xCell.Interior.Color = 255 And Right(xCell.Value, 1) <> "F" Then
            xCell.Value = xCell.Value & "F"
        End If
    Next xCell
End Sub

Salut Elodie195,
Peut être avec ce petit bout de code

@+ Lolote83

 

[JHA]

Bonjour à tous,

Avec lire.cellule

JHA

 

[Elodie195]

Bonjour Lolote83 et JHA,

Merci beaucoup pour votre aide c'est parfait !

Bonne journée.

 

[JHA]

Bonjour à tous,

Pour des explications sur lire.cellule, voir ici le topic de Fev 2005
https://www.excel-downloads.com/threads/astuce-recente-lire-cellule.32955/

JHA

 

[Elodie195]

Merci JHA