colorer image clic macro

akrillon · 15 Avril 2014

Bonjour tout le monde,

J'aimerais un peu d'aide 🙂

je cherche à colorer une image lorsque je clic dessus,
Cepandant ayant plusieurs images j'aimerais que celle-ci redeviene blanc si je clic sur une autre image.

J'imagine qu'il faut utiliser un do loop, while mais je ne suis pas bien sur je suis novice en macro ^^

J'ai deja écrie ça :

ActiveSheet.Shapes.Range(Array("xxxx")).Select
With Selection.ShapeRange.Fill
.Visible = msoTrue
.ForeColor.RGB = RGB(255, 0, 0)
.Transparency = 0
.Solid
End With

Voila merci beaucoup de votre aide!!

st007 · 15 Avril 2014

Re : colorer image clic macro

Bonjour,
un peu comme dans ce fichier

akrillon · 15 Avril 2014

Re : colorer image clic macro

Bonjour à toi,
Merci d'avoir répondue 🙂

Alors c'est un peu ça, mais dans ce cas, les images ne sont pas indépandante les unes des autres,
Moi j'ai plus de 40 images différentes alors ce sera long à écrire ^^

st007 · 15 Avril 2014

Re : colorer image clic macro

ou bien voir du côté de
For Each s In ActiveSheet.Shapes

next s

colorer image clic macro

akrillon

Guest

st007

XLDnaute Barbatruc

Pièces jointes

akrillon

Guest

st007

XLDnaute Barbatruc

Discussions similaires

colorer image clic macro

akrillon

Guest

st007

XLDnaute Barbatruc

Pièces jointes

akrillon

Guest

st007

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency