IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Suppression d'une image par Macro


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre habitué
    Homme Profil pro
    Inscrit en
    Août 2011
    Messages
    10
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Août 2011
    Messages : 10
    Par défaut Suppression d'une image par Macro
    Bonjour à tous,
    En cette forte chaleur mes neurones fonctionnent au ralenti alors je viens chercher un peu d'aide.
    Voià mon pb :
    Je souhaite automatiser via un bouton la suprpession d'une image d'une feuille de calcul.
    Le Hic, c'est que la feuille contient plusieurs images.
    Les macro que j'ai trouvé ou bricolé ci et là ne me permettent que de supprimer l'ensemble des images de la feuille, alors que je n'en vise qu'une seule..
    Auriez vous la solution ?
    Merci à tous de votre aide..

  2. #2
    Membre chevronné Avatar de Bear the french
    Homme Profil pro
    Inscrit en
    Mai 2012
    Messages
    352
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Saône et Loire (Bourgogne)

    Informations forums :
    Inscription : Mai 2012
    Messages : 352
    Par défaut
    Bonjour Gibé2201,

    Pour cibler une seule image, il faut avoir au minimum son nom.
    Quel nom porte ton image ? Ce nom évolue-t-il ? Si oui, sur quelle base ?

    Bertrand

  3. #3
    Membre habitué
    Homme Profil pro
    Inscrit en
    Août 2011
    Messages
    10
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Août 2011
    Messages : 10
    Par défaut
    Merci Bertrand,
    C'est bien ce que je me disais
    Alors en fait j'ai une macro qui copie l'image souhaitée (en fonction d'un critère définie dans la feulle excel) sur une zone. La macro va chercher l'image sur un onglet qui est masqué pour l'utilisateur. Il y a une image par onglet (plus simple à gérer pour moi, ce sont des copies de graphs minitab)
    Chaque image s'appelle "object 1" dans les onglets "bibliothèque". Mais dés que la macro copie colle l'image, l'image change de nom (le compteur s'incrémente à chaque essai, ou à chaque copie d'image)..
    La solution est elle de nommer chaque image dans les feuilles par un nom spécifique (genre boite1, boite2...) ?
    Je ne sais pas si je suis trés clair...

  4. #4
    Membre chevronné Avatar de Bear the french
    Homme Profil pro
    Inscrit en
    Mai 2012
    Messages
    352
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Saône et Loire (Bourgogne)

    Informations forums :
    Inscription : Mai 2012
    Messages : 352
    Par défaut
    Sur chaque feuille, si tu veux supprimer la dernière image insérée, tu peux essayer ça... Un exemple avec la feuille 1 :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Sub Macropourjerome()
    With Worksheets("Feuil1")
        .Shapes.Range(Array(.Shapes(.Shapes.Count).Name)).Delete
    End With
    End Sub
    Sinon la solution de nommer chaque image dans les feuilles par un nom spécifique (au moment de sa copie par exemple) me parait une bonne idée.
    Exemple avec le nom "boite1"

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Sub Macropourjerome2()
    With Worksheets("Feuil1")
        .Shapes.Range(Array("boite1")).Delete
    End With
    End Sub
    Bertrand

  5. #5
    Membre habitué
    Homme Profil pro
    Inscrit en
    Août 2011
    Messages
    10
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Août 2011
    Messages : 10
    Par défaut

    merci Bertrand
    J'ai testé la 1ère méthode, ça marche
    En fait pour être plus précis l'utilisateur choisit une valeur dans la feuille ou doit venir se coller l'image
    En fonction de la valeur choisie, la macro active la feuille où est rangée l'image correspondante, sélectionne l'image, la copie, retourne sur la feuille de l'utilisateur, colle l'image copiée et remasque la feuille où est rangée l'image.
    Ce que je cherchais à faire, c'est effacer l'image du dernier utilisateur pour que le nouveau puisse en coller une nouvelle en fonction de la valeur choisie.
    J'ai donc testé la 1ère méthode, ça marche, sauf que chose bizarre, une fois la macro exécutée, je n'ai plus accés à ma liste de choix (le choix se fait par liste déroulante alimentée via "données ==> validation"
    Bizarre bizarre...

  6. #6
    Membre averti
    Homme Profil pro
    Étudiant
    Inscrit en
    Avril 2019
    Messages
    35
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 32
    Localisation : France, Puy de Dôme (Auvergne)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Avril 2019
    Messages : 35
    Par défaut
    Citation Envoyé par Bear the french Voir le message

    Sinon la solution de nommer chaque image dans les feuilles par un nom spécifique (au moment de sa copie par exemple) me parait une bonne idée.
    Exemple avec le nom "boite1"

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Sub Macropourjerome2()
    With Worksheets("Feuil1")
        .Shapes.Range(Array("boite1")).Delete
    End With
    End Sub
    Bertrand

    Salut le deuxième code est bien pour moi, sauf que dans mon cas les images sont presentes ou pas presente, et je veux que le code le detecte, si les images sont presentes alors il applique ce code, il supprime l'image que si elle est presente.
    Ici comme l'image n'est pas presente, le code fait une erreur.

    Merci de m'aider

Discussions similaires

  1. [débutant]Placer une image par dessus une autre
    Par sempire dans le forum Balisage (X)HTML et validation W3C
    Réponses: 2
    Dernier message: 21/11/2005, 18h42
  2. Transfert d'une image par socket stream
    Par francky23012301 dans le forum Langage
    Réponses: 1
    Dernier message: 31/10/2005, 16h06
  3. [MySQL] Comment afficher une image par défaut ?
    Par clicman dans le forum PHP & Base de données
    Réponses: 9
    Dernier message: 12/10/2005, 08h46
  4. Modifier une image par pixels
    Par mateo.14 dans le forum MFC
    Réponses: 10
    Dernier message: 21/01/2005, 15h09
  5. [FLASH MX] Envoyer une image par e-mail
    Par skyjoe dans le forum Flash
    Réponses: 2
    Dernier message: 22/10/2004, 18h11

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo