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"
    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