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

VBA Word Discussion :

Macro affectée à une image [WD-2016]


Sujet :

VBA Word

  1. #1
    Nouveau membre du Club
    Femme Profil pro
    Inscrit en
    mai 2012
    Messages
    45
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : Suisse

    Informations forums :
    Inscription : mai 2012
    Messages : 45
    Points : 31
    Points
    31
    Par défaut Macro affectée à une image
    Bonsoir,

    En Word 2003, j'avais un modèle qui comportait une image qui, lorsqu'on cliquait 2x dessus, exécutait une macro. Sur l'image, il y avait un champ MACROBUTTON plus le nom de la macro à exécuter.

    Depuis que j'ai converti ce modèle en Word 2016, la macro ne s'exécute plus.

    Comment fait-on désormais pour affecter une macro à une image située sur le document ? Je ne parle pas ici d’une icône sur le ruban.

    Merci d'avance pour votre réponse.

    Belle soirée !
    SuzyR

  2. #2
    Expert éminent sénior

    Homme Profil pro
    Développeur Vba Excel
    Inscrit en
    avril 2013
    Messages
    4 482
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations professionnelles :
    Activité : Développeur Vba Excel
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : avril 2013
    Messages : 4 482
    Points : 11 389
    Points
    11 389
    Billets dans le blog
    33
    Par défaut
    Citation Envoyé par SuzyR Voir le message

    Bonjour,

    Il y a peut-être plus simple, mais voilà comment je procède :

    • Dans le menu Développeur, passez en mode création et choisissez le contrôle Active X Image.
    • Passez dans les propriétés et chargez votre image.
    • Pour la positionner n’importe où sur l’écran, créez un forme rectangulaire sans aucun remplissage correspondant au format de votre image.
    • Coupez collez votre image dans la forme créée, faites disparaître la bordure de la forme.


    Pour la macro associée, en mode création, double-cliquez sur l'image, et choisissez l'événement Image1_MouseDown par exemple
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
     
     
    Private Sub Image1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
        MsgBox "Hello !", vbInformation
    End Sub
    Images attachées Images attachées
    Eric KERGRESSE
    https://sites.google.com/site/erickergresseeirl/
    Lorsque vous avez la réponse à votre question, n'oubliez pas de cliquer sur et si celle-ci est pertinente pensez à voter

  3. #3
    Nouveau membre du Club
    Femme Profil pro
    Inscrit en
    mai 2012
    Messages
    45
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : Suisse

    Informations forums :
    Inscription : mai 2012
    Messages : 45
    Points : 31
    Points
    31
    Par défaut
    Bonjour,
    Un immense merci Eric !!
    Très belle journée.
    SuzyR

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [WD-2007] MACRO : encadrer une image sélectionnée
    Par DSI0499 dans le forum VBA Word
    Réponses: 8
    Dernier message: 11/01/2010, 20h15
  2. [XL-2003] Macro pour une image
    Par m0urad dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 18/11/2009, 10h09
  3. affecter une image au paramètre d'une requête
    Par RodEpsi dans le forum Bases de données
    Réponses: 1
    Dernier message: 03/12/2006, 12h44
  4. Comment affecter une image a un PictureBox par code?
    Par ayouss dans le forum VB 6 et antérieur
    Réponses: 3
    Dernier message: 25/07/2006, 09h26
  5. Comment je peux affecter une image a mon profil
    Par jlassira dans le forum Mode d'emploi & aide aux nouveaux
    Réponses: 5
    Dernier message: 09/03/2006, 22h44

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