Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Word > VBA Word
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 07/11/2007, 17h02   #1
Invité de passage
 
Inscription : novembre 2007
Messages : 2
Détails du profil
Informations personnelles :
Âge : 57

Informations forums :
Inscription : novembre 2007
Messages : 2
Points : 1
Points : 1
Par défaut Récupérer un mot par double clic

Peut-on en VBA sous Word 2003 en double-cliquant sur un mot exécuter une macro qui récupère les caractères de ce mot ?
(Comme sous Excel : OnDoubleClic dans auto_open et utilisation de ActiveCell)
Merci pour la solution et de m'avoir lu.
jmmarseille est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 07/11/2007, 17h43   #2
Responsable Word

 
Avatar de Heureux-oli
 
Homme Olivier Lebeau
Contrôleur d'industrie
Inscription : février 2006
Messages : 17 354
Détails du profil
Informations personnelles :
Nom : Homme Olivier Lebeau
Âge : 47
Localisation : Belgique

Informations professionnelles :
Activité : Contrôleur d'industrie
Secteur : Aéronautique - Marine - Espace - Armement

Informations forums :
Inscription : février 2006
Messages : 17 354
Points : 29 270
Points : 29 270
Malheureusement, Word ne réagit pas à ce genre d'évènement comme le fait Excel.

Word reste avant tout un traitement de texte.
__________________
J'ai pas encore de décodeur, alors, postez en clair ! Comment mettre une balise de code ?
Débutez en VBA

Mes articles


Dans un MP, vous pouvez me dire que je suis beau, ... mais si c'est une question technique je ne la lis pas ! Vous êtes prévenus !
Heureux-oli est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 18/11/2007, 13h43   #3
Inactif
 
Avatar de ouskel'n'or
 
Inscription : février 2005
Messages : 12 466
Détails du profil
Informations forums :
Inscription : février 2005
Messages : 12 466
Points : 11 930
Points : 11 930
Tu as une autre solution : Tu insères un module à ton projet -> Editeur VB -> Insérer Module
Tu écris ta macro dans le module
Code :
1
2
3
4
5
6
7
Sub LaMacro()
     LaSelection = Selection
     MsgBox LaSelection
     'ou
     selection.copy
      'ou ce que tu veux
End Sub
Ensuite tu vas dans -> Outils -> Personnaliser -> Onglet Commandes -> Clavier -> Macros -> Enregistrer dans -> Sélection du fichier dans lequel tu as placé ta macro -> Sélection de "LaMacro" -> Champ Nouvelles touches de raccourci -> Appui sur les touches de fonction voulues -> Attribuer -> Fermer
Une fois réalisé, tu sélectionnes ton mot, tu appuies sur les touches de fonction et ta macro s'exécutera.
Pour affecter Les touches de fonction F12 et Alt par macro ça donne ça
Code :
1
2
3
    CustomizationContext = ActiveDocument
    KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyF12, wdKeyAlt), KeyCategory:= _
        wdKeyCategoryMacro, Command:="LaMacro"
A+
ouskel'n'or est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 19/11/2007, 10h27   #4
Invité de passage
 
Inscription : novembre 2007
Messages : 2
Détails du profil
Informations personnelles :
Âge : 57

Informations forums :
Inscription : novembre 2007
Messages : 2
Points : 1
Points : 1
Trop fort ouskel'n'or
Merci pour la solution, ça fonctionne très bien et ça ouvre plein de portes via Normal.dot.
Merci encore.
jmmarseille est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 19/11/2007, 11h35   #5
Inactif
 
Avatar de ouskel'n'or
 
Inscription : février 2005
Messages : 12 466
Détails du profil
Informations forums :
Inscription : février 2005
Messages : 12 466
Points : 11 930
Points : 11 930
Utile en effet. Maintenant si ça résoud ton pb, y'a un bouton Résolu qui n'attend plus qu'un petit clic
A+
ouskel'n'or est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 10h34.


 
 
 
 
Partenaires

Hébergement Web