Image dans control+cellule

Y compris Power BI, Power Query et toute autre question en lien avec Excel
Répondre
l
llc95
Jeune membre
Jeune membre
Messages : 21
Inscrit le : 13 février 2014
Version d'Excel : 2010

Message par llc95 » 25 octobre 2014, 15:28

Bonjour le forum,
qui peut me dire si c'est possible d’insérer une image dans un "control Image" et dans une cellule en même temps à l'aide d'un "bouton" ?

Par avance merci

LLc95
l
llc95
Jeune membre
Jeune membre
Messages : 21
Inscrit le : 13 février 2014
Version d'Excel : 2010

Message par llc95 » 25 octobre 2014, 15:56

voici le code, qui lui, insère l'image ds une cellule. Je souhaiterai insérer la même image dans "Image2" de mon userform dans ce code.
Merci d'avance

Private Sub CommandButton5_Click()

If MsgBox("Avez-vous crée une image de votre signature ?", vbYesNo) = vbYes Then

Dim Image As Variant
Dim L As Single, T As Single, W As Single, H As Single

L = Range("Signature").Left
T = Range("Signature").Top
W = Range("Signature").Width
H = Range("Signature").Height

Image = Application.GetOpenFilename
If Image <> False Then

Sheets("Formulaire").Shapes.AddPicture Image, True, True, L, T, W, H

End If

End If
End Sub
Répondre
  • Sujets similaires
    Réponses
    Vues
    Dernier message