Discussion :

[ronibalbo]

Bonjour à tous
J'ai bien le signet "Txt_Test" dans le doc seulement à l'exe, Word me renvoie l'erreur 5101: ce signet n'existe pas'
Étonnant non !

Code :

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

1
2
3
Private Sub Btn_Test1_Click()
    ActiveDocument.GoTo What:=wdGoToBookmark, Which:=wdGoToFirst, Name:="Txt_Test"
End Sub

Une raison ?
Merci

[Heureux-oli]

Salut,

Fais une boucle VBA pour repérer tes signet et en extraire le nom.

Code :

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

1
2
3
4
5
6
7
8
Sub testsursignet()
dim myS as Bookmark
 
For each mys in activeDocument.bookmarks
debug.print mys.name
next mys
 
end sub

Tu pourras au moins comparer le nom renvoyé et celui que tu utilises.

[ronibalbo]

Merci, Nickel,
cela me renvoie effectivement les signets suivants:

• Txt_Date
• Txt_Eval_Sante
• Txt_Nom
• Txt_Rslt_Log
• Txt_Test

Strange, à suivre.
Est-ce la structure de mon doc. Il faut que je lise depuis le debut le tuto sur vba World...
Si vous avez encore des pistes !
Salutations,

[Heureux-oli]

Salut,


Pourrais-tu mettre ton document sur le forum ?
Avec juste ton erreur, mais vidé de son contenu ?

[ronibalbo]

Et hop, comme convenu mon doc quasi vide.
L'idée est simple, un clic sur le bouton et le pointeur va se placer sur le signet "Txt_Test" (qu'il ne reconnait pas !).
J'ai plus l'habitude du vba sous excel, même si cela reste encore amateur, mais je pense qu'on peut faire un max de truc sous Word, seulement de prime abord, j'ai l'impression que le code demande d’être plus rigoureux...
Salutations,

[Heureux-oli]

Salut,

je ne sais pas pourquoi.
Mais j'ai une solution à te proposer.

Code :

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

ActiveDocument.Bookmarks("Txt_Test").Range.Select