Airone784
XLDnaute Occasionnel
Bonjour,
Avec mon code je souhaite insérer dans ma feuille une image :
Problème : j'ai un code erreur d'execution 1004 : impossible de lire la propriété add de la classe OLEobjects. Je ne comprends pas pourquoi...
Merci d'avance pour votre aide
Bonne journée
Avec mon code je souhaite insérer dans ma feuille une image :
Code:
Sub aab()
'
' aab Macro
Dim obj As OLEObject
Set obj = ActiveSheet.OLEObjects.Add(ClassType:="Forms.image.1", link:=False, _
DisplayAsIcon:=False, Filename:="T:\M.ALPINI\FI.jpg", Left:=352.5, Top:=130.5, Width:=273, Height:= _
80.25)
Selection.ShapeRange.ScaleWidth 0.91, msoFalse, msoScaleFromTopLeft
Selection.ShapeRange.ScaleWidth 0.93, msoFalse, msoScaleFromTopLeft
Selection.ShapeRange.ScaleWidth 0.97, msoFalse, msoScaleFromTopLeft
End Sub
Problème : j'ai un code erreur d'execution 1004 : impossible de lire la propriété add de la classe OLEobjects. Je ne comprends pas pourquoi...
Merci d'avance pour votre aide
Bonne journée
Dernière édition: