Petite question sur les images

[mahamalily]

Bonjour à tous,

J'aurais besoin de votre aide.

J'aimerais afficher une image sous Excel 2007 mais pas n'importe comment...

L'utilisateur aura une combobox (liste proposée par l'administrateur par exemple avec A, B, C et D) .

Et quand il aura choisi l'un des items, il faudrait que l'image concernant cette information s'affiche !

Exemple : Je veux sélectionner l'élément D qui va m'afficher une image D décoré comme si c'était pour les petits enfants.

Et oui, cette image doit être associée à cet élément...

Merci à l'avance pour votre aide...

 

[tototiti2008]

Re : Petite question sur les images

Bonjour mahamalily,

Bienvenue sur XLD,

Peut-être sur l'excellent site de Jacques Boisgontier

Les images et shapes

 

[mahamalily]

Re : Petite question sur les images

Ok cool merci je vais regarder ca ce soir ou bientôt (parce que là où je suis je n'ai pas d'accès) 😱

 

[job75]

Re : Petite question sur les images

Bonjour mahamalily, re-salut tototiti,

C'est simple si dans la feuille les seuls objets sont les images (renommées) et la ComboBox :

Private Sub ComboBox1_Change()
Dim s As Object
For Each s In Me.Shapes
  If Not s.Name Like "ComboBox*" Then s.Visible = False
Next
Me.Shapes(ComboBox1).Visible = True
End Sub

Edit : sur mon fichier de test les images sont des objets de Type = 13 = msoPicture

On peut donc utiliser cette macro :

Private Sub ComboBox1_Change()
Dim s As Object
For Each s In Me.Shapes
  If s.Type = msoPicture Then s.Visible = False
Next
Me.Shapes(ComboBox1).Visible = True
End Sub

A+

 

[mahamalily]

Re : Petite question sur les images

OK merci!!! jvais voir ca et je te tiens au courant 😉