Classe Bookmarks (Word VBA)
Collection d'objets Bookmark qui représentent les signets contenus dans la sélection, la plage ou le document spécifié. Pour utiliser une variable de classe Bookmarks, elle doit d'abord être instanciée, par exemple
Dim bkms as Bookmarks
Set bkms = ActiveDocument.Bookmarks
For Each
Voici un exemple de traitement des éléments Bookmarks dans une collection
Dim bkm As Bookmark
For Each bkm In ActiveDocument.Bookmarks
Next bkm
Add
Renvoie un objet Bookmark qui représente un signet ajouté à une plage.
Sub BMark()
' Select some text in the active document prior
' to execution.
ActiveDocument.Bookmarks.Add _
Name:="myplace", Range:=Selection.Range
End Sub
Arguments
Un argument nommé
Name (String) - Nom du signet.
Optional arguments
Les arguments suivants sont facultatifs
Range (Range) - Plage de texte incluse dans le signet.
Count
Renvoie le nombre d'éléments dans la collection Bookmarks.
Dim lngCount As Long
lngCount = ActiveDocument.Bookmarks.Count
DefaultSorting
Renvoie ou définit l’option de tri des noms de signet affichés dans la boîte de dialogue Signet (menu Insertion). Les valeurs de retour possibles sont wdSortByLocation - Tri par emplacement dans le document, wdSortByName - Tri par nom de signet.
Cette propriété n’a aucune incidence sur l’ordre des objets Bookmark dans la collection Bookmarks .
ActiveDocument.Bookmarks.DefaultSorting = wdSortByLocation
Dialogs(wdDialogInsertBookmark).Show
Exists
Détermine si le signet spécifié existe.
Exists (Name)
Name: Un nom de signet qui ne peut pas inclure plus de 40 caractères ou plus d’un mot.
If ActiveDocument.Bookmarks.Exists("start") = True Then
ActiveDocument.Bookmarks("start").Delete
End If
Item
Renvoie un objet Bookmark spécifique appartenant à une collection.
Item (Index)
Index: Objet spécifique qui doit être renvoyé.
Sub BookmarkItem()
If ActiveDocument.Bookmarks.Exists("temp") = True Then
ActiveDocument.Bookmarks.Item("temp").Select
End If
End Sub
ShowHidden
True si les signets masqués sont inclus dans la collection Bookmarks.
La propriété ShowHidden contrôle également si des signets masqués sont répertoriés dans la boîte de dialogue **Signet ** (menu **Insertion **).
ActiveDocument.Bookmarks.ShowHidden = True
Dialogs(wdDialogInsertBookmark).Show