Effacer une image dans un "image (contrôle activeX)"

[maval]

Bonsoir

J'ai deux lignes de code pour retirer une image dans "image (contrôle activeX)

 ActiveSheet.Image2.Picture = LoadPicture("")
 Application.ScreenUpdating = True

Et j'ai a chaque fois un message d'erreur "La méthode Picture de l'objet IImage a échoué"

Je vous remercie de votre aide

 

[maval]

Re : Effacer une image dans un "image (contrôle activeX)"

Bonjour

Personne peut m'aider?

Bonne journée

 

[phlaurent55]

Re : Effacer une image dans un "image (contrôle activeX)"

Bonjour Max,

un moyen détourné : remplacer l'image affichée par une autre
tu crées une image blanche et modifie le code comme ceci:

ActiveSheet.Image2.Picture = LoadPicture("imageblanche")

à+
Philippe

 

[phlaurent55]

Re : Effacer une image dans un "image (contrôle activeX)"

re,

ou alors:
ActiveSheet.Image2.Visible = False

et ne pas oublier de remettre à True par la suite

à+
Philippe

 

[maval]

Re : Effacer une image dans un "image (contrôle activeX)"

Bonjour Philippe,

Je te remercie j'ai employer la deuxième solution.

Bonne journée
@+

 

[BOISGONTIER]

Re : Effacer une image dans un "image (contrôle activeX)"

Bonjour,

Me.Image1.Picture = LoadPicture

JB