Classe Indexes (Word VBA)
Collection d’objets index qui représente tous les index du document spécifié. Pour utiliser une variable de classe Indexes, elle doit d'abord être instanciée, par exemple
Dim idxs as Indexes
Set idxs = ActiveDocument.Indexes
For Each
Voici un exemple de traitement des éléments Indexes dans une collection
Dim idx As Index
For Each idx In ActiveDocument.Indexes
Next idx
Add
Renvoie un objet Index qui représente un nouvel index ajouté à un document.
Un index est généré à partir des champs d'entrée d'Index (XE) d'un document.
Add (Range, HeadingSeparator, RightAlignPageNumbers, Type, NumberOfColumns, AccentedLetters, SortBy, IndexLanguage)
ActiveDocument.Indexes.MarkEntry _
Range:=Selection.Range, Entry:="My Entry"
Set MyRange = ActiveDocument.Content
MyRange.Collapse Direction:=wdCollapseEnd
ActiveDocument.Indexes.Add Range:=MyRange, Type:=wdIndexRunin
Arguments
Un argument nommé
Range (Range) - Plage où vous souhaitez faire figurer l'index.
Optional arguments
Les arguments suivants sont facultatifs
HeadingSeparator (String) - Le texte entre les groupes alphabétiques (entrées qui commencent par la même lettre) dans l'index.
RightAlignPageNumbers (Boolean) - True : pour aligner les numéros de page sur la marge de droite.
Type (WdIndexType) - Spécifie si les sous-entrées sont sur la même ligne (suite) que l'entrée principale ou sur une ligne distincte (mis en retrait) à partir de l'entrée principale.
Les valeurs de retour possibles sont wdIndexIndent - Index avec retrait, wdIndexRunin - Index continu.
NumberOfColumns (Long) - Nombre de colonnes de chaque page d'index.
AccentedLetters (Boolean) - True pour insérer des titres distincts pour les lettres accentuées dans l'index (par exemple, les mots qui commencent par « ? » et les mots qui commencent par « A » sont répertoriés sous des titres différents). .
SortBy (WdIndexSortBy) - Les critères de tri à utiliser pour l'index spécifié.
Les valeurs de retour possibles sont wdIndexSortByStroke - Le tri s'effectue selon le nombre de traits des caractères, wdIndexSortBySyllable - Tri phonétique.
IndexLanguage (WdLanguageID) - La langue de tri à utiliser pour l'index spécifié.
Ici on trouve valeurs possible pour
AutoMarkEntries
Ajoute automatiquement des champs XE (entrée d'index) dans le document spécifié en utilisant les entrées contenues dans un fichier de concordances.
Un fichier de concordances est un document Word qui contient un tableau à deux colonnes dont la première renferme les termes à indexer, et la deuxième les entrées d'index.
AutoMarkEntries (ConcordanceFileName)
ConcordanceFileName: Nom du fichier de concordances qui comprend la liste des éléments à indexer.
Documents("Thesis.doc").Indexes.AutoMarkEntries _
ConcordanceFileName:="C:\Documents\List.doc"
Count
Renvoie un type long qui représente le nombre d'index dans la collection.
Dim lngCount As Long
lngCount = ActiveDocument.Indexes.Count
Format
Cette propriété renvoie ou définit un WdIndexFormat qui représente la mise en forme pour les index dans le document spécifié. Les valeurs de retour possibles sont wdIndexBulleted - Liste à puces, wdIndexClassic - Classique, wdIndexFancy - Recherché, wdIndexFormal - Formel, wdIndexModern - Moderne, wdIndexSimple - Simple, wdIndexTemplate - À partir d'un modèle.
ActiveDocument.Indexes.Format = wdIndexBulleted
Item
Renvoie un objet index spécifique appartenant à une collection.
Item (Index)
Index: Objet spécifique qui doit être renvoyé.
Dim idx As Index
Set idx = ActiveDocument.Indexes(Index:=1)
MarkAllEntries
Insère un champ XE (entrée d'index) après toutes les occurrences du texte dans la plage.
MarkAllEntries (Range, Entry, EntryAutoText, CrossReference, CrossReferenceAutoText, BookmarkName, Bold, Italic)
If Selection.Type = wdSelectionNormal Then
ActiveDocument.Indexes.MarkAllEntries _
Range:=Selection.Range, _
Entry:=Selection.Range.Text, Italic:=True
ActiveDocument.Indexes(1).Update
End If
Arguments
Un argument nommé
Range (Range) - Plage dont le texte est marqué par un champ XE dans le document.
Optional arguments
Les arguments suivants sont facultatifs
Entry (Index) - Texte à faire figurer dans l'index, sous la forme EntréePrincipale[:SousEntrée].
EntryAutoText (String) - Insertion automatique qui contient le texte à faire apparaître dans l'index. (Si vous spécifiez cet argument, l'argument Entrée est ignoré.).
CrossReference (Index) - Renvoi qui apparaîtra dans l'index.
CrossReferenceAutoText (String) - Nom de l'insertion automatique qui contient le texte d'un renvoi. (Si vous spécifiez cet argument, l'argument Renvoi est ignoré.).
BookmarkName - String
Bold (Boolean) - True : pour ajouter des numéros de page des entrées d'index en gras.
Italic (Boolean) - True : pour ajouter des numéros de page des entrées d'index en italique.
MarkEntry
Insère un champ XE (entrée d'index) après la plage spécifiée.
MarkEntry (Range, Entry, EntryAutoText, CrossReference, CrossReferenceAutoText, BookmarkName, Bold, Italic, Reading)
If Selection.Type = wdSelectionNormal Then
ActiveDocument.Indexes.MarkEntry Range:=Selection.Range, _
Entry:="Introduction:" & Selection.Range.Text, Italic:=True
End If
Arguments
Un argument nommé
Range (Range) - Emplacement de l'entrée.
Optional arguments
Les arguments suivants sont facultatifs
Entry (String) - Texte qui apparaît dans l'index.
EntryAutoText (String) - Nom de l'insertion automatique qui contient le texte de l'index, de la table des illustrations ou de la table des matières (la valeur de l'argument Entrée est ignorée).
CrossReference (String) - Renvoi qui apparaît dans l'index (par exemple, « Voir Astres »).
CrossReferenceAutoText (String) - Nom de l'insertion automatique qui contient le texte d'un renvoi (la valeur de l'argument Renvoi est ignorée).
BookmarkName - String
Bold (Boolean) - True pour faire apparaître les numéros de page des entrées en gras dans l'index.
Italic (Boolean) - True pour faire apparaître les numéros de page des entrées en italique dans l'index.
Reading - Boolean