user_mobilelogo

Word 365: Vous saurez tout !

Pour tout connaître sur Word
Nouvelle version !

600 pages !

9,80 € 

 

En savoir plus.

Pour un document de cours de type médecine, je cherche à insérer des commentaires sur les mots compliqués afin d'avoir immédiatement la définition dans le volet Commentaires

 

Si l'on souhaite avoir ce commentaire sur tous les mots identiques du document, il faut une macro.

Il suffit alors de sélectionner un mot et de lancer la macro. La macro demande de saisir le commentaire et l'attribue à tous les mots identiques au mot sélectionné.

Prenez soin auparavant, pour rendre la fonction plus pratique, d'installer la macro sur le ruban ou la barre d'outils, ou de lui attribuer un raccourci clavier.

Cela risque tout de même de prendre un peut de temps sur un gros document.

 

Sub infobulle()
'macro écrite par m@rina
Dim masélection As Range
Dim mot
Dim définition As String

Set masélection = Selection.Words(1)
comm = InputBox("Quelle est le commentaire ?")

For Each mot In ActiveDocument.Words
mot.Select
If mot = masélection Then
    mot.Comments.Add Range:=Selection.Range
    Selection.TypeText Text:=comm
End If
Next

End Sub

 

Statistiques

Aujourd'hui169
Hier3318
Cette semaine13586
Ce mois76383
Total depuis 200412595015

6
visiteurs actuellement en ligne

27 novembre 2020