Macro couleur d'une fleche

Ayden -  
Le Pingou Messages postés 12713 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Dans un de mes fichiers, j'ai des fleches (dessins) auquelles j'aimerais associer une couleur selon une valeur d'une cellule voisine. La mise en forme conditionnelle ne fonctionnant pas pour les dessins.

MErci de votre aide

A voir également:

1 réponse

Le Pingou Messages postés 12713 Date d'inscription   Statut Contributeur Dernière intervention   1 467
 
Bonjour,
Au passage, exemple de procédure (couleur rouge pour l'objet [Flèche droite 1]) :
Sub CouleurFleche() 
ActiveSheet.Shapes.Range(Array("Right Arrow 1")).Select 
    With Selection.ShapeRange.Fill 
        .Visible = msoTrue 
        .ForeColor.RGB = RGB(255, 0, 0) 
        .Transparency = 0 
        .Solid 
    End With 
End Sub 


Note: à adapter selon vos besoins.

Salutations.
Le Pingou
0