Insertion d'image
Résolu
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
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
