Essayer d'obtenir des images pop-up pour la liste de téléphone dans Excel

Question

J'ai une liste de téléphone simple avec des colonnes sous la forme de nom, adresse, numéro de téléphone, etc. Dans la dernière colonne, je voudrais avoir l'équivalent d'un commentaire rollover qui ferait apparaître automatiquement la photo des personnes (il y en a beaucoup qui ne viennent que rarement à ce groupe, et cela aiderait à les reconnaître et à se souvenir de leurs noms)

1) J'ai essayé de changer la boîte de commentaire Shapes, mais bien sûr, il n'y a pas de type de forme msoPicture.

2) J'ai essayé de placer l'image dans la cellule et de la rendre cliquable, puis de la cliquer de nouveau pour qu'elle s'effondre. Mais l'identification de l'image source pour changer son ampleur m'a bloqué.

Des pensées?

Answer 1

D'accord, j'ai trouvé une réponse. Placez l'image dans un petit format dans la cellule adjacente au nom de la personne et affectez-lui la macro suivante. Toutes les images pointent vers la même macro. cliquer sur l'image la fait basculer entre grand et petit.

Sub Picture_Magnify_Click() 
    With ActiveSheet.Shapes(Application.Caller) 
    If .Height < 20 Then 
     .Height = .Height * 4 
     Else 
     .Height = .Height/4 
     End If 

    End With 
    End Sub