Discussion :

[poctoy]

bonjour,
j'ai un document assez long, utilisé pour des questions juridiques.
en première page, je souhaitais faire un index, ce que j'ai pu réaliser.
ça me donne donc une liste de mots clés, avec les pages dans lesquelles ces mots sont utilisés.
le problème que c'est ça oblige le lecteur à aller manuellement à chaque page pour voir si chaque texte répond à sa question.
je veux donc qu'en cliquant sur chaque numéro de page dans mon index, le lecteur soit automatiquement dirigé vers la page en question. ensuite si c'est précisément ce qu'il recherche, qu'il clic sur le mot ou l'expression et ça le ramène à l'index pour qu'il essaye la page suivante.
par exemple
dans mon index j'ai
maison individuelle 2,5, 11, 12 etc...

en cliquant sur "2", le lecteur est dirigé sur l'expression maison individuelle de la page 2 : la maison individuelle est aujourd'hui le rêve...
si c'est pas ce qu'il rechcerche, en cliquant sur "maison individuelle", être redirigé à l'index sur le mot "maison individuelle" pour essayer la page 5.

j'ai essayé avec le renvoi, le signet (en utilisant l'aide de word ou sur différents supports d'aides), mais je ne comprends pas très bien comment ça marche, soit je l'utilise mal, soit ça me paraît très long.

qq'un peut-il m'expliquer précisément comment utiliser la bonne fonction de word?


merci beaucoup

[QuestVba]

Bonjour,

Avec l'index, ce n'est pas prévu.

En effet, un index répertorie les mots choisis avec, pour chaque mot, le
numéro de la page où il se trouve.

On peut donc avoir, pour un seul mot, un ou plusieurs numéros de page.
Comment word ferait-il pour s'y retrouver ?

[poctoy]

merci.
oui, c'est bien mon problème...je pensais que word pourrait proposer ce genre d'outils, un genre d'index amélioré, en passant par les renvois ou signets?

poc

[Heureux-oli]

Salut,

Ce que tu souhaites faire va transformer ton document en usine à gaz.
Tu vas avoir besoin d'hyperliens dans tous les sens pour naviguer d'un endroit à l'autre.

Word n'est pas vraiment conçu pour ce genre de chose (c'est un traitement de texte), du moins pas en automatique.

[carden752]

Bonjour,

Voici un bout de code à tester qui pourrait correspondre à ton besoin.
Il faut sélectionner le numéro de la page en face de ton index.
Ensuite, il recherche la première occurence de cette page, y insère un signet et te permet d'atteindre toutes les autres entrées. Il te prévient si tu as parcouru toutes les entrées.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Sub indexpage()
Dim mot As String
Dim numpage As Long
Dim premierpass As Boolean
premierpass = False
numpage = Trim(Selection.Text)
mot = "XE " & Chr(34) & Selection.Paragraphs(1).Range.Words(1).Text & Chr(34)
With Selection.Find
.ClearFormatting
.Text = mot
.Wrap = wdFindContinue
.Forward = True
End With
Selection.HomeKey wdStory
Selection.GoTo wdGoToPage, wdGoToFirst, numpage
Selection.Find.Execute
Selection.Bookmarks.Add "monpremierelement"
While (MsgBox("Voulez vous trouver l'entrée suivante", vbRetryCancel) = vbRetry)
Selection.Find.Execute2007
If Selection.Range.Start = ActiveDocument.Bookmarks("monpremierelement").Range.Start Then
MsgBox "Attention, toutes les occurences ont été passées"
Exit Sub
End If
Wend
End Sub

Dis moi si des ajustements sont à réalisés