fichiers .png et excel Résolu/Fermé

Question

Bonjour,
j'utilise excel de manière "basique". J'ai 4 fichiers avec l'extension .png représentant chacun les 4 couleurs du jeu de cartes (cour, carreau, pique, trèfle).

Comment associer ces fichiers à une cellule ?

Par exemple si j'ai le nombre "15" en cellule A1 et que dans la cellule A2 je tape "=A1", 15 figurera dans la cellule A2,

Avec l'image cela n'est pas possible.....  Commenet pratiquer ?

Merci

m@rina · Answer

Bonjour,

Je ne vois pas comment associer une cellule à une image sans passer par du VBA.

On peut imaginer un contrôle Image (de la boîte à outils Contrôles) dont la propriété Picture changera selon le contenu de la cellule A1 par exemple, avec une macro comme celle ci :

Private Sub Worksheet_Change(ByVal maplage As Range)
If Not Intersect(Range("A1"), maplage) Is Nothing Then
If maplage = "carreau" Then
Image1.Picture = LoadPicture("C:\...\Mes documents\Mes images\carreau.png")
ElseIf maplage = "coeur" Then
Image1.Picture = LoadPicture("C:\...\Mes documents\Mes images\coeur.png")
ElseIf maplage = "pique" Then
Image1.Picture = LoadPicture("C:\...\Mes documents\Mes images\pique.png")
ElseIf maplage = "trèfle" Then
Image1.Picture = LoadPicture("C:\...\Mes documents\Mes images	rèfle.png")

End If
End If
End Sub

Fichiers .png et excel

1 réponse