OVH Cloud OVH Cloud

couleur de cellules

1 réponse
Avatar
mic3812
Bonjour,
Dans une macro je cherche le moyen de colorier certaine cellules.
La macro est:
Set maPlage = Selection.EntireRow.Resize(, 8).Offset(-1, 0).Resize(,
8)
maPlage.Cells(13).Formula = maPlage.Cells(10) - maPlage.Cells(2)
maPlage.Cells(14).Formula = maPlage.Cells(12) / maPlage.Cells(11)
maPlage.Cells(15).Formula = maPlage.Cells(11) / maPlage.Cells(13) *
100
maPlage.Cells(16).Formula = maPlage.Cells(15) * maPlage.Cells(14)
maPlage.Offset(2, 0).Resize(, 1).Select

Je sais colorier toute la ligne,
maPlage.Resize(2).interior.ColorIndex=35#
mais je cherche à colorier certaine cellule de la deuxième ligne. par
exemple la cellule 13 color 45.la cellule 14 color 47
merci pour votre aide.
michel

1 réponse

Avatar
AV
Si la coloration des cellules correspond à une logique (qui pour l'heure
m'échappe !) regarde du côté de la mise en form conditionnelle

AV

a écrit dans le message news:

Bonjour,
Dans une macro je cherche le moyen de colorier certaine cellules.
La macro est:
Set maPlage = Selection.EntireRow.Resize(, 8).Offset(-1, 0).Resize(,
8)
maPlage.Cells(13).Formula = maPlage.Cells(10) - maPlage.Cells(2)
maPlage.Cells(14).Formula = maPlage.Cells(12) / maPlage.Cells(11)
maPlage.Cells(15).Formula = maPlage.Cells(11) / maPlage.Cells(13) *
100
maPlage.Cells(16).Formula = maPlage.Cells(15) * maPlage.Cells(14)
maPlage.Offset(2, 0).Resize(, 1).Select

Je sais colorier toute la ligne,
maPlage.Resize(2).interior.ColorIndex5#
mais je cherche à colorier certaine cellule de la deuxième ligne. par
exemple la cellule 13 color 45.la cellule 14 color 47
merci pour votre aide.
michel