colorer certaines cellules

Le
magic-dd
bonjour et bonne anne tous

alors voici mon souci

comment traduire en vba

pour chaque cellules de la plage A1 B13,

si une de ces cellules est egale la cellule E1, alors ces cellules
identiques auront pour fond la couleur rouge et la police sera jaune


merci de votre aide

le for each n'est pas encore ma porte
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Modeste
Le #18270901
Bonsour® magic-dd
bonnes année meilleurs voeux à tous

alors voici mon souci
comment traduire en vba
pour chaque cellules de la plage A1 à B13,
si une de ces cellules est egale à la cellule E1, alors ces cellules
identiques auront pour fond la couleur rouge et la police sera jaune
le for each n'est pas encore à ma portée



dans ce cas nul besoin de VBA ;o)))
utiliser la mise en forme conditionnelle

Selectionner la plage A1:B13
Menu Format > Mise en forme Conditionnelle...
Condition 1
la valeur de la cellule est :
égale à
=$E$1
bouton Format...
police : Jaune
motif : Rouge
FFO
Le #18272001
Salut à toi
Ce code devrait faire :

For Each c In Range("A1", "B13")
If c = Range("E1") Then
c.Interior.ColorIndex = 3
c.Font.ColorIndex = 6
End If
Next

Dis moi !!!
Publicité
Poster une réponse
Anonyme