Sujet Précédent Sujet Suivant

Texte dans la Cellule A partir de La Couleur

djca Messages postés 32 Statut Membre -  
djca Messages postés 32 Statut Membre -
Bonjour
Peux t on écrire une macro qui écrirait un texte comme "Rouge" si la couleur de fond est rouge , "Vert" si vert
et comment créer une boucle pour scanner les cellules de A1 à F30 et pour marquer "Rouge" ou "Vert" ou "" pour chaque cellule
cdt
merci d'avance

2 réponses

Réponse 1 / 2
djca Messages postés 32 Statut Membre 5
 
Sub Essai_Condition_Couleur()
'
If ActiveCell.Interior.Color = 255 Then
ActiveCell.Formula = "Rouge"
End If

End Sub
0
Réponse 2 / 2
djca Messages postés 32 Statut Membre 5
 
sub couleur ()
Dim i As Long, NombreLigne As Long
NombreLigne = 23
Range("E3").Select
For i = 1 To NombreLigne
Essai_Condition_Couleur
ActiveCell.Offset(1, 0).Range("A1").Select
Next i

End Sub
0

Discussions similaires

Excel formule : savoir si une cellule contient partie texte
plunderer007 -
francois -

14 réponses
Code source couleur de fond
Mehdi-Amg -
Techno01 -

9 réponses
Changer la couleur d'une cellule selon son texte
fantomex -
Picton -

5 réponses
Excel et cellules en couleur si texte
Jimmy -
Chap -

10 réponses
Excel: Si contient *partie texte1* OU *partie de texte2 alors...
Fab -
Fab -

2 réponses