Coloriage forme libre par macro

Fermé
Pelouno - 19 nov. 2014 à 14:05
Mike-31 Messages postés 18337 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 27 septembre 2024 - 19 nov. 2014 à 17:39
Bonjour,

Comment est-il possible de corréler le remplissage d'une cellule avec le remplissage d'une forme libre ?
Quelle sorte de macro peut aller chercher la couleur d'une cellule pour la donner à une forme libre ?

Cordialement.

(utilisation d'excel 7)

Windows 7 / excel 7
A voir également:

2 réponses

pilas31 Messages postés 1825 Date d'inscription vendredi 5 septembre 2008 Statut Contributeur Dernière intervention 24 avril 2020 643
19 nov. 2014 à 17:13
Bonjour,

Voici une instruction VBA qui fonctionne :
ActiveSheet.Shapes("Forme libre 1").Fill.ForeColor.RGB = Range("A1").Interior.Color


Dans la feuille active elle met la couleur de fond de la cellule A1 dans la forme "Forme libre 1"
2
Mike-31 Messages postés 18337 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 27 septembre 2024 5 100
19 nov. 2014 à 17:39
Bonsoir,

oui ou encore avec une variable en tête

Sub Coloriage()
Couleur = Sheets("Feuil1").Range("C2").Interior.Color
Sheets("feuil1").Shapes("Forme libre 1").Fill.ForeColor.RGB = Couleur
End Sub
0