Classe TextRetrievalMode (Word VBA)

La classe TextRetrievalMode représente les options qui contrôlent la façon dont le texte est extrait d’un objet Range . Pour utiliser une variable de classe TextRetrievalMode, elle doit d'abord être instanciée, par exemple

Dim trm as TextRetrievalMode
Set trm = ActiveDocument.Range.TextRetrievalMode

Duplicate

Renvoie un objet TextRetrievalMode en lecture seule qui représente les options liées à l’extraction de texte d’un objet Range .

Vous pouvez utiliser la propriété Duplicate pour collecter les paramètres de toutes les propriétés d'un objet dupliqué.

Dim trmDuplicate As TextRetrievalMode
Set trmDuplicate = ActiveDocument.Range.TextRetrievalMode.Duplicate

IncludeFieldCodes

La valeur true si le texte récupéré dans la plage spécifiée contient des codes de champ.

Tant que cette propriété n'est pas définie, sa valeur par défaut est celle de l'option Codes de champ de l'onglet Affichage de la boîte de dialogue Options (menu Outils). Utilisez la propriété Text avec un objet Range pour récupérer du texte dans la plage spécifiée.

Dim rngTemp As Range 
 
Set rngTemp = ActiveDocument.Paragraphs(1).Range 
 
rngTemp.TextRetrievalMode.IncludeFieldCodes = False 
MsgBox rngTemp.Text

IncludeHiddenText

True si le texte récupéré dans la plage spécifiée contient du texte masqué.

Tant que cette propriété n'est pas définie, sa valeur par défaut est celle de l'option Texte masqué située sous l'onglet Affichage de la boîte de dialogue Options (menu Outils). Utilisez la propriété Text avec un objet Range pour récupérer du texte dans la plage spécifiée.

Dim rngTemp As Range 
 
Set rngTemp = ActiveDocument.Sentences(1) 
 
rngTemp.TextRetrievalMode.IncludeHiddenText = True 
MsgBox rngTemp.Text

ViewType

Cette propriété renvoie ou définit l'affichage de l'objet TextRetrievalMode. Les valeurs de retour possibles sont wdConflictView, wdMasterView - Mode masque, wdNormalView - Mode Normal, wdOutlineView - Mode Plan, wdPrintPreview - Mode Aperçu avant impression, wdPrintView - Mode Page, wdReadingView - Mode Lecture, wdWebView - Mode Web.

Modification de l'affichage de l'objet TextRetrievalMode ne change pas l'affichage d'un document à l'écran.

Set myText = ActiveDocument.Content 
myText.TextRetrievalMode.ViewType = wdOutlineView 
Msgbox myText