Changement de couleur d'une forme automatique [Fait] [Résolu]

[thierrylon]

Bonjour,
j'aimerais savoir le code pour que lorsque je clic dessus la couleur d'une forme automatique (par exemple un carré) change.Ceci lors d'un Diaporama.
Merci d'avance.

[maxime115]

une simple petite maccro a affecter au clic sur l'ojet (clic droit/ parametre des actions)

Code :

1
2
3
4
Sub changecolor ()
Activepresentation.slides(numero de ta diapo).shapes(numero de ton image).Fill.Forecolor.RGB = RGB(255, 0, 0)
end sub

ce code va donc mettre ta forme en rouge. pour trouver le numero de ton image je t'invite a regarder ce que j'ai écrit ici

cordialement

[thierrylon]

Ca marche, merci. Par contre est-il possible de faire une seule macro par page car j'ai plusieurs objets, mais jaimerais faire une seule macro qui change la couleur de l'objet sur lequel ont clic.

[maxime115]

Ah non malheureusement... Le code ne peut pas savoir sur quel objet tu as cliqué Il t'es donc obligé de faire une macro par objet...
Bon courage

[thierrylon]

merci beaucoup.