Coloriage forme libre par macro

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

2 réponses

  1. Contributeur
    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
    1. 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