Image dans control+cellule

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

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

Rechercher des sujets similaires à "image control"