Bonjour,

J'ai lu cette discussion et j'ai moi-même besoin d'aide pour piloter Word.

Depuis Excel, j'aimerais sélectionner (.Follow) un certain champ dans la table des matières afin d'arriver directement à la page voulue.

J'ai déjà écrit ceci :

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
Sub Picture_Click()
 
    Dim NumPicture As String
    Dim appword As Word.Application
 
    NumPicture = Application.Caller
    Set appword = New Word.Application
    Application.DisplayAlerts = True
    appword.ShowMe
    appword.Visible = True
    appword.Documents.Open (ThisWorkbook.Path & "\Document.doc")
 
    Dim Itm As Field
 
    For Each Itm In ActiveDocument
 
 
    Next
 
    appword.Documents.Close
End Sub
Donc c'est bien dans la boucle "For Each" que je suis bloqué car je n'arrive pas à contrôler chaque champ composant la table des matières et encore moins récupérer le numéro du champ afin de le comparer à la variable "NumPicture"

Première fois que j'utilise du word en vba et j'ai un peut de mal je dois dire

Merci à(aux) âme(s) qui voudront bien m'aider !