Menu

Insertion d'image [Résolu/Fermé]

juer31 54 Messages postés mercredi 16 décembre 2015Date d'inscription 18 mai 2018 Dernière intervention - 11 janv. 2017 à 16:27 - Dernière réponse : cs_Le Pivert 5183 Messages postés jeudi 13 septembre 2007Date d'inscriptionContributeurStatut 21 juin 2018 Dernière intervention
- 11 janv. 2017 à 16:32
Bonjour,

j'ai trouver ce code pour l'insertion d'image mais au lieu de mettre l'image dans la cellule active j'aimerais le mettre dans une cellule précise

Sub pos_img()

ActiveSheet.Pictures.Insert("C:\image.jpg").Select

With Selection.ShapeRange
.Left = ActiveCell.Left
.Top = ActiveCell.Top
End With

End Sub

Merci
Afficher la suite 

1 réponse

cs_Le Pivert 5183 Messages postés jeudi 13 septembre 2007Date d'inscriptionContributeurStatut 21 juin 2018 Dernière intervention - 11 janv. 2017 à 16:32
0
Merci
Bonjour,

Voilà un exemple:

http://www.cjoint.com/c/GAlpFD8L7KQ