Afficher une photo JPG

Hello le Forum,

Je suis embeter pour afficher une image JPG dans Excel.

Est il possible que excel affiche une image JPG qui ce trouve sur mon disque dur (c:photo) dans un formulaire selon un nom dans une cellule ?

Ex:

En A3 je donne le nom de l'image 1234.jpg et excel va la cherchée dans le c:photo,1234.jpg et l'affiche dans une serie de cellule liee par ex: C10,11?

Ou faux il crée un formulaire VB ou j'affiche mes données concernant mon inventaire?

Merci de l'aide

Alain

Bonjour,

Et avec ceci ?

Sub InsererImage()

    Dim S As Shape

    'supprime l'acienne image
    On Error Resume Next
    ActiveSheet.Shapes("MonImage").Delete

    'insère l'image sur C10:C11
    With Range("C10")

        Set S = ActiveSheet.Shapes.AddPicture(Range("A3"), _
                                              msoTrue, _
                                              msoTrue, _
                                              .Left, _
                                              .Top, _
                                              .Width, _
                                              .Height + [C11].Height)

        S.Name = "MonImage"

    End With

End Sub

Hervé.

Bonjour,

Merci pour votre aide. J'ai fais des essais ca fonctionne aussi pour l'insertion d'image. j'ai pris la proposition d'un autre membre.

Merci baucoup de votre aide

Salutauitons

Alain

Rechercher des sujets similaires à "afficher photo jpg"