Discussion :

[TheRealMike]

Bonjour,

J'ai dans ma feuille excel une forme libre, et je voudrais tapez un code VBA pour pouvoir en changer la couleur.
J'ai tenter sans grand espoir:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveSheet.Shapes("Free Form 5").Color = Red

L'espoir fait vivre comme on dit....

Pouvez-vous m'aider?

[SilkyRoad]

bonjour

Voici deux possibilités

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveSheet.Shapes("Free Form 5").Fill.ForeColor.RGB = RGB(255, 0, 0)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveSheet.Shapes("Free Form 5").Fill.ForeColor.SchemeColor = 2

michel

[TheRealMike]

merci beaucoup, ca marche avec :
ActiveSheet.Shapes("FreeForm 5").Fill.ForeColor.RGB = RGB(255, 0, 0)

mais comment faites vous pour trouver ce code? il faut se servir de l'aide ou d'autres chose??

[SilkyRoad]

bonjour

Tu peux trouver de nombreuses solutions en utilisant:
L'aide Excel
L'enregistreur de macros
Les autres exemples du forum
La FAQ
Les sources
Les livres
...



michel