[WD-2003] Attribution de signets à un tableau (Où est l'erreur...) [Résolu]

[Betadine]

Bonjour,

J'ai créé une fonction me permettant de trouver un tableau dans un document word et d'y attribuer un signet du nom que l'on passe en argument, mais cette fonction boggue et me dit qu'un objet est requis... Savez vous où est l'erreur ?

Merci beaucoup.

Voici la fonction...

Code :

1
2
3
4
5
6
7
Function AjoutSignetAuTableau(NumeroDuTableau, NomDuSignet)
'Ajout d'un signet a un tableau
ThisDocument.Tables(NumeroDuTableau).Select
With ThisDocument.Bookmarks
            .Add Range:=Selection.Range, Name:=NomDuSignet & CStr(i)
        End With
End Function

Que j'appelle ailleurs de cette manière...

Code :

1
2
3
Private Sub Ok_Click()
AjoutSignetAuTableau(2,"signet1")
End Sub

[carden752]

Bonjour,

En général, c'est lorsque l'objet n'existe pas.
Est-ce que tu as bien autant de tableaux dans ton document que le numéro du tableau à rechercher? (Attention avec les suppressions)
Est-ce que tu as un seul document ouvert et c'est le bon document activé?

[Betadine]

Oui, tu as raison. C'est parce que le signet avait disparu. Il a suffit de le rajouter dans word.

Un Double clic sur le champs ou le tableau, puis remplissage de la textbox signet avec le nom qui va bien. Ou bien dans le menu word >> Insertion >> Signets.