Classe Range (Word VBA)

La classe Range représente une zone contiguë dans un document.

Les procédures principales de la classe Range sont Copy, Delete et Select

Set

Pour utiliser une variable de classe Range, elle doit d'abord être instanciée, par exemple

Dim rng as Range
Set rng = ActiveDocument.Range()

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe Range : Document.Characters, Characters, Selection.Characters, Document.GrammaticalErrors, Document.SpellingErrors, GrammaticalErrors, SpellingErrors, AutoTextEntry.Insert, Bookmark.Range, Break.Range, BuildingBlock.Insert, Cell.Range, Characters.Item, Characters.First, Characters.Last, CoAuthLock.Range, CoAuthUpdate.Range, Comment.Range, Comment.Reference, Comment.Scope, Conflict.Range, ContentControl.Range, Document.Range, Document.Content, Document.GoTo, Editor.Range, Editor.NextRange, Endnote.Range, Endnote.Reference, Endnotes.Separator, Endnotes.ContinuationNotice, Endnotes.ContinuationSeparator, Envelope.Address, Envelope.ReturnAddress, Field.Code, Field.Result, Footnote.Range, Footnote.Reference, Footnotes.Separator, Footnotes.ContinuationNotice, Footnotes.ContinuationSeparator, FormField.Range, Frame.Range, HeaderFooter.Range, HTMLDivision.Range, Hyperlink.Range, Index.Range, InlineShape.Range, Line.Range, List.Range, MailMergeField.Code, OMath.Range, OMathBreak.Range, OMathFunction.Range, OMaths.Add, Paragraph.Range, ProofreadingErrors.Item, Next, Previous, GoTo, Duplicate, GoToNext, GoToPrevious, FormattedText, GoToEditableRange, NextStoryRange, Rectangle.Range, RepeatingSectionItem.Range, Revision.Range, Revision.MovedRange, Row.Range, Row.ConvertToText, Rows.ConvertToText, Section.Range, Selection.Range, Selection.Next, Selection.Previous, Selection.GoTo, Selection.GoToNext, Selection.GoToPrevious, Selection.FormattedText, Selection.GoToEditableRange, Sentences.Item, Sentences.First, Sentences.Last, Series.Values, Series.XValues, Shape.Anchor, ShapeRange.Anchor, StoryRanges.Item, Subdocument.Range, Table.Range, Table.ConvertToText, TableOfAuthorities.Range, TableOfContents.Range, TableOfFigures.Range, TextFrame.ContainingRange, TextFrame.TextRange, Window.RangeFromPoint, Words.Item, Words.First, Words.Last, XMLNode.Range, Document.Sentences, Sentences, Selection.Sentences, Document.StoryRanges, Document.Words, Words et Selection.Words

For Each

Voici un exemple de traitement des éléments Range dans une collection

Dim rngCharacter As Range
Dim iFontSize As Integer: iFontSize = 8
For Each rngCharacter In ActiveDocument.Words(1).Characters
    rngCharacter.Font.Size = iFontSize
    iFontSize = iFontSize + 2
Next rngCharacter

Thèmes

Certaines procédures de cette classe ont été regroupées en thèmes et sont décrites sur des pages thématiques séparées

Format with its procedures AutoFormat, Borders, CharacterStyle, CharacterWidth, FitTextWidth, Font, FormattedText, HighlightColorIndex, Information, ListFormat, ListStyle, PageSetup, ParagraphFormat, ParagraphStyle, PasteAndFormat, Style, TableStyle et TextVisibleOnScreen
Import/Export with its procedures ExportAsFixedFormat, ExportAsFixedFormat2, ExportFragment et ImportFragment

Méthodes

Les méthodes principales de la classe Range sont

Copy - Copie la plage spécifiée dans le Presse-papiers.

ActiveDocument.Range.Copy

Delete - Supprime le nombre de caractères ou de mots spécifié.

Dim lngDelete As Long
lngDelete = ActiveDocument.Range.Delete()

Select - Sélectionne la plage spécifiée.

ActiveDocument.Range.Select

Autre Méthodes

CheckSpelling - Lance la vérification de l'orthographe de la plage ou du document spécifié.

ActiveDocument.Range.CheckSpelling

Collapse - Réduit une plage ou une sélection vers la position de départ ou de fin.

ActiveDocument.Range.Collapse

ConvertHangulAndHanja - Convertit la plage spécifiée de hangûl en hanja, et inversement.

ActiveDocument.Range.ConvertHangulAndHanja

ConvertToTable - Convertit le texte d'une plage à un tableau.

Dim tblConvertToTable As Table
Set tblConvertToTable = ActiveDocument.Range.ConvertToTable()

EndOf - Déplace ou étend l'emplacement du caractère de fin d'une plage vers la fin de l'unité de texte spécifiée la plus proche.

Dim lngEndOf As Long
lngEndOf = ActiveDocument.Range.EndOf()

GetSpellingSuggestions - Renvoie une collection SpellingSuggestions qui représente les corrections suggérées en remplacement du premier mot de la plage spécifiée.

Dim sssGetSpellingSuggestions As SpellingSuggestions
Set sssGetSpellingSuggestions = ActiveDocument.Range.GetSpellingSuggestions()

GoTo - Renvoie un objet Range qui représente la position de début de l'élément spécifié, par exemple une page, un signet ou un champ.

Dim rngGoTo As Range
Set rngGoTo = ActiveDocument.Range.GoTo()

InsertAlignmentTab - Insère une tabulation absolue toujours positionnée au même endroit par rapport aux marges ou aux retraits.

Dim lngAlignment As Long: lngAlignment =  
ActiveDocument.Range.InsertAlignmentTab Alignment:=lngAlignment

InsertCrossReference - Insère un renvoi correspondant à un titre, un signet, une note de bas de page, une note de fin, ou à un élément disposant d'une étiquette de légende (comme une équation, une figure ou un tableau).

Dim strReferenceItem As String: strReferenceItem =  
ActiveDocument.Range.InsertCrossReference ReferenceType:=wdRefTypeBookmark, ReferenceKind:=wdContentText, ReferenceItem:=strReferenceItem

InsertDatabase - Extrait des données à partir d'une source de données (par exemple, un autre document Microsoft Word, une feuille de calcul Microsoft Excel ou une base de données Microsoft Access) et insère les données sous forme de tableau à la place de la plage spécifiée.

ActiveDocument.Range.InsertDatabase

InsertDateTime - Insère la date et/ou l'heure courante sous forme de texte ou de champ TIME.

ActiveDocument.Range.InsertDateTime

InsertFile - Insère tout ou partie du fichier spécifié.

Dim strFileName As String: strFileName =  
ActiveDocument.Range.InsertFile FileName:=strFileName

InsertSymbol - Insère un symbole à la place de la plage spécifiée.

Dim lngCharacterNumber As Long: lngCharacterNumber =  
ActiveDocument.Range.InsertSymbol CharacterNumber:=lngCharacterNumber

InsertXML - Insère les données XML spécifiées dans le document sur la plage spécifiée, en remplaçant le texte de la plage.

Dim strXML As String: strXML =  
ActiveDocument.Range.InsertXML XML:=strXML

ModifyEnclosure - Ajoute, modifie et supprime un symbole qui entoure des caractères spécifiés.

ActiveDocument.Range.ModifyEnclosure Style:=

Move - Réduit la plage spécifiée à sa position de début ou de fin, puis déplace l'objet réduit du nombre d'unités indiqué.

Dim lngMove As Long
lngMove = ActiveDocument.Range.Move()

MoveEnd - Déplace la position du caractère de fin d'une plage.

Dim lngMoveEnd As Long
lngMoveEnd = ActiveDocument.Range.MoveEnd()

MoveEndUntil - Déplace la position de fin de la plage spécifiée jusqu'à ce qu'un des caractères indiqués soit trouvé dans le document.

Dim lngMoveEndUntil As Long
lngMoveEndUntil = ActiveDocument.Range.MoveEndUntil(Cset:=)

MoveEndWhile - Déplace la position du caractère de fin d'une plage tant que l'un des caractères spécifiés est trouvé dans le document.

Dim strCset As String: strCset =  
Dim lngMoveEndWhile As Long
lngMoveEndWhile = ActiveDocument.Range.MoveEndWhile(Cset:=strCset)

MoveStart - Déplace la position de début de la plage spécifiée.

Dim lngMoveStart As Long
lngMoveStart = ActiveDocument.Range.MoveStart()

MoveStartUntil - Déplace la position de début de la plage spécifiée jusqu'à ce que l'un des caractères indiqués soit trouvé dans le document.

Dim strCset As String: strCset =  
Dim lngMoveStartUntil As Long
lngMoveStartUntil = ActiveDocument.Range.MoveStartUntil(Cset:=strCset)

MoveStartWhile - Déplace la position de début de la plage spécifiée tant que l'un des caractères spécifiés est trouvé dans le document.

Dim strCset As String: strCset =  
Dim lngMoveStartWhile As Long
lngMoveStartWhile = ActiveDocument.Range.MoveStartWhile(Cset:=strCset)

MoveUntil - Déplace la plage spécifiée jusqu'à ce que l'un des caractères indiqués soit trouvé dans le document.

Dim strCset As String: strCset =  
Dim lngMoveUntil As Long
lngMoveUntil = ActiveDocument.Range.MoveUntil(Cset:=strCset)

MoveWhile - Déplace la plage spécifiée tant que l'un des caractères indiqués est trouvé dans le document.

Dim strCset As String: strCset =  
Dim lngMoveWhile As Long
lngMoveWhile = ActiveDocument.Range.MoveWhile(Cset:=strCset)

Next - Renvoie un objet Range qui représente l’unité spécifiée par rapport à la plage spécifiée.

Dim rngNext As Range
Set rngNext = ActiveDocument.Range.Next()

PasteExcelTable - Colle et met en forme un tableau Microsoft Excel.

ActiveDocument.Range.PasteExcelTable LinkedToExcel:=True, WordFormatting:=True, RTF:=True

PasteSpecial - Insère le contenu du Presse-papiers.

ActiveDocument.Range.PasteSpecial

PhoneticGuide - Ajoute des guides phonétiques à la plage spécifiée.

Dim strText As String: strText =  
ActiveDocument.Range.PhoneticGuide Text:=strText

Previous - Renvoie la plage précédente en fonction de la plage spécifiée.

Dim rngPrevious As Range
Set rngPrevious = ActiveDocument.Range.Previous()

SetRange - Définit les emplacements des caractères de début et fin d'une plage existante.

Dim lngStart As Long: lngStart = 
Dim lngEnd As Long: lngEnd =  
ActiveDocument.Range.SetRange Start:=lngStart, End:=lngEnd

StartOf - Déplace ou étend la position de début de la plage spécifiée ou la sélection au début de l'unité de texte spécifiée le plus proche.

Dim lngStartOf As Long
lngStartOf = ActiveDocument.Range.StartOf()

TCSCConverter - Convertit la plage spécifiée du chinois traditionnel en chinois simplifié et inversement.

ActiveDocument.Range.TCSCConverter

Propriétés

Characters.Count Renvoie le nombre de caractères dans la collection Characters.

Dim lngCount As Long
lngCount = ActiveDocument.Range.Characters.Count

Characters.First Renvoie un objet Range qui représente le premier caractère de la collection.

Dim rngFirst As Range
Set rngFirst = ActiveDocument.Range.Characters.First

Characters.Last Renvoie un objet Range qui représente le dernier caractère de la collection.

Dim rngLast As Range
Set rngLast = ActiveDocument.Range.Characters.Last

Characters.Parent Renvoie un Object qui représente le parent de l'objet Characters spécifié.

Dim objParent As Object
Set objParent = ActiveDocument.Range.Characters.Parent

ProofreadingErrors.Count Renvoie un type long qui représente le nombre de fautes de grammaire dans la collection.

Dim lngCount As Long
lngCount = ActiveDocument.SpellingErrors.Count

ProofreadingErrors.Parent Renvoie un Object qui représente l'objet parent de l'objet ProofreadingErrors spécifié.

Dim objParent As Object
Set objParent = ActiveDocument.SpellingErrors.Parent

ProofreadingErrors.Type Renvoie le type de faute de grammaire ou d'orthographe.

Dim wpeType As WdProofreadingErrorType
wpeType = ActiveDocument.SpellingErrors.Type

Bold True si la plage est en gras.

ActiveDocument.Range.Bold =

BoldBi True si la police ou la plage est en gras.

ActiveDocument.Range.BoldBi =

BookmarkID Renvoie le numéro du signet qui encadre le début de la plage spécifiée; renvoie 0 (zéro) s’il n’y a aucun signet correspondant.

Dim lngBookmarkID As Long
lngBookmarkID = ActiveDocument.Range.BookmarkID

Bookmarks Renvoie une collection Bookmarks qui représente tous les signets contenus dans un document, une plage ou une sélection.

Dim bkmsBookmarks As Bookmarks
Set bkmsBookmarks = ActiveDocument.Range.Bookmarks

Case Cette propriété renvoie ou définit une constante WdCharacterCase qui représente la casse du texte dans la plage spécifiée.

ActiveDocument.Range.Case = wdFullWidth

Cells Renvoie une collection Cells qui représente les cellules de tableau d’une plage.

Dim cllsCells As Cells
Set cllsCells = ActiveDocument.Range.Cells

Characters Renvoie une collection Characters qui représente les caractères d’une plage.

Dim chrsCharacters As Characters
Set chrsCharacters = ActiveDocument.Range.Characters

Columns Renvoie une collection Columns qui représente toutes les colonnes de tableau contenues dans la plage.

Dim clmsColumns As Columns
Set clmsColumns = ActiveDocument.Range.Columns

CombineCharacters True si la plage spécifiée contient des caractères combinés.

ActiveDocument.Range.CombineCharacters = True

Comments Renvoie une collection Comments qui représente tous les commentaires du document, de la sélection ou de la plage spécifiée.

Dim cmmsComments As Comments
Set cmmsComments = ActiveDocument.Range.Comments

Conflicts Renvoie un objet de collection Conflicts qui contient tous les objets Conflicts de la plage.

Dim cnfsConflicts As Conflicts
Set cnfsConflicts = ActiveDocument.Range.Conflicts

ContentControls Renvoie une collection ContentControls qui représente les contrôles de contenu contenus dans une plage.

Dim ccsContentControls As ContentControls
Set ccsContentControls = ActiveDocument.Range.ContentControls

DisableCharacterSpaceGrid La valeur true si Microsoft Word ignore le nombre de caractères par ligne de l'objet Range correspondant.

ActiveDocument.Range.DisableCharacterSpaceGrid = True

Document Renvoie un objet document associé à la plage spécifiée.

Dim docDocument As Document
Set docDocument = ActiveDocument.Range.Document

Duplicate Renvoie un objet Range en lecture seule qui représente toutes les propriétés de la plage spécifiée.

Dim rngDuplicate As Range
Set rngDuplicate = ActiveDocument.Range.Duplicate

Editors Renvoie un objet Editors qui représente tous les utilisateurs autorisés à modifier une sélection ou une plage dans un document.

Dim edtsEditors As Editors
Set edtsEditors = ActiveDocument.Range.Editors

EmphasisMark Cette propriété renvoie ou définit la marque d'accentuation d'un caractère ou une chaîne de caractères spécifique.

ActiveDocument.Range.EmphasisMark = wdEmphasisMarkNone

End Renvoie ou définit l'emplacement du caractère de fin d'une plage .

ActiveDocument.Range.End =

EndnoteOptions Renvoie un objet EndnoteOptions qui représente les notes de fin d’une plage.

Dim eosEndnoteOptions As EndnoteOptions
Set eosEndnoteOptions = ActiveDocument.Range.EndnoteOptions

Endnotes Renvoie une collection Endnotes qui représente toutes les notes de fin contenues dans une plage.

Dim endsEndnotes As Endnotes
Set endsEndnotes = ActiveDocument.Range.Endnotes

EnhMetaFileBits Renvoie une valeur de type Variant qui représente une image de la façon dont une plage de texte s’affiche.

Dim varEnhMetaFileBits As Variant
varEnhMetaFileBits = ActiveDocument.Range.EnhMetaFileBits

Fields Renvoie une collection Fields qui représente tous les champs de la plage.

Dim fldsFields As Fields
Set fldsFields = ActiveDocument.Range.Fields

Find Renvoie un objet Find qui contient les critères spécifiés pour une recherche.

Dim fndFind As Find
Set fndFind = ActiveDocument.Range.Find

FootnoteOptions Renvoie un objet FootnoteOptions qui représente les notes de bas de page dans une sélection ou une plage.

Dim fosFootnoteOptions As FootnoteOptions
Set fosFootnoteOptions = ActiveDocument.Range.FootnoteOptions

Footnotes Renvoie une collection Footnotes qui représente toutes les notes de bas de page d’une plage.

Dim ftnsFootnotes As Footnotes
Set ftnsFootnotes = ActiveDocument.Range.Footnotes

FormFields Renvoie une collection FormFields qui représente tous les champs de formulaire contenus dans la plage.

Dim ffsFormFields As FormFields
Set ffsFormFields = ActiveDocument.Range.FormFields

Frames Renvoie une collection frames qui représente tous les cadres contenus dans une plage.

Dim frmsFrames As Frames
Set frmsFrames = ActiveDocument.Range.Frames

GrammarChecked True si une vérification de la grammaire a été exécutée sur la plage spécifiée ou le document.

ActiveDocument.Range.GrammarChecked = True

GrammaticalErrors Renvoie une collection ProofreadingErrors qui représente les phrases qui ont échoué à la vérification grammaticale de la plage ou du document spécifié.

Dim pesGrammaticalErrors As ProofreadingErrors
Set pesGrammaticalErrors = ActiveDocument.Range.GrammaticalErrors

HorizontalInVertical Cette propriété renvoie ou définit la mise en forme de texte horizontal défini dans du texte vertical.

ActiveDocument.Range.HorizontalInVertical = wdHorizontalInVerticalFitInLine

HTMLDivisions Renvoie un objet HTMLDivisions qui représente une division HTML dans un document Web.

Dim htmsHTMLDivisions As HTMLDivisions
Set htmsHTMLDivisions = ActiveDocument.Range.HTMLDivisions

Hyperlinks Renvoie une collection Hyperlinks qui représente tous les liens hypertexte de la plage spécifiée.

Dim hypsHyperlinks As Hyperlinks
Set hypsHyperlinks = ActiveDocument.Range.Hyperlinks

ID Cette propriété renvoie ou définit le nom d'identification pour la plage spécifiée.

ActiveDocument.Range.ID =

InlineShapes Renvoie une collection InlineShapes qui représente tous les objets InlineShape dans une plage.

Dim issInlineShapes As InlineShapes
Set issInlineShapes = ActiveDocument.Range.InlineShapes

IsEndOfRowMark True si la plage spécifiée est réduite et se trouve sur une marque de fin de ligne dans une table.

Dim booIsEndOfRowMark As Boolean
booIsEndOfRowMark = ActiveDocument.Range.IsEndOfRowMark

Italic True si la police ou la plage est en italique.

ActiveDocument.Range.Italic =

ItalicBi True si la police ou la plage est en italique.

ActiveDocument.Range.ItalicBi =

Kana Renvoie ou définit une valeur précisant si la plage de texte en langue japonaise spécifiée est écrite en hiragana ou en katakana.

ActiveDocument.Range.Kana = wdKanaHiragana

LanguageDetected Cette propriété renvoie ou définit une valeur qui indique si Microsoft Word a détecté la langue du texte spécifié.

ActiveDocument.Range.LanguageDetected = True

LanguageID Cette propriété renvoie ou définit une constante WdLanguageID qui représente la langue de la plage spécifiée.

ActiveDocument.Range.LanguageID = wdAfrikaans

LanguageIDFarEast Renvoie ou définit une langue d'Asie orientale pour l'objet spécifié.

ActiveDocument.Range.LanguageIDFarEast = wdAfrikaans

LanguageIDOther Cette propriété renvoie ou définit la langue pour la plage spécifiée.

ActiveDocument.Range.LanguageIDOther = wdAfrikaans

ListParagraphs Renvoie une collection ListParagraphs qui représente tous les paragraphes numérotés contenus dans la plage.

Dim lpsListParagraphs As ListParagraphs
Set lpsListParagraphs = ActiveDocument.Range.ListParagraphs

Locks Renvoie un objet de collection CoAuthLocks qui représente tous les verrous de la plage.

Dim calsLocks As CoAuthLocks
Set calsLocks = ActiveDocument.Range.Locks

NextStoryRange Renvoie un objet Range qui fait référence à l’article suivant.

Dim rngNextStoryRange As Range
Set rngNextStoryRange = ActiveDocument.Range.NextStoryRange

NoProofing True si le vérificateur d'orthographe et de grammaire ignore le texte spécifié.

ActiveDocument.Range.NoProofing =

OMaths Renvoie une collection OMaths qui représente les objets OMath dans la plage spécifiée.

Dim omsOMaths As OMaths
Set omsOMaths = ActiveDocument.Range.OMaths

Orientation Cette propriété renvoie ou définit l'orientation du texte dans une plage lorsque la fonctionnalité Orientation du texte est activée.

ActiveDocument.Range.Orientation = wdTextOrientationDownward

Paragraphs Renvoie une collection paragraphs qui représente tous les paragraphes de la plage spécifiée.

Dim prgsParagraphs As Paragraphs
Set prgsParagraphs = ActiveDocument.Range.Paragraphs

Parent Renvoie un Object qui représente l'objet parent de l'objet Range spécifié.

Dim objParent As Object
Set objParent = ActiveDocument.Range.Parent

ParentContentControl Renvoie un objet ContentControl qui représente le contrôle de contenu parent pour la plage spécifiée.

Dim cclParentContentControl As ContentControl
Set cclParentContentControl = ActiveDocument.Range.ParentContentControl

PreviousBookmarkID Renvoie le numéro du dernier signet qui commence avant ou au même endroit que la plage spécifiée.

Dim lngPreviousBookmarkID As Long
lngPreviousBookmarkID = ActiveDocument.Range.PreviousBookmarkID

ReadabilityStatistics Renvoie une collection ReadabilityStatistics qui représente les statistiques de lisibilité de la plage ou du document spécifié.

Dim rssReadabilityStatistics As ReadabilityStatistics
Set rssReadabilityStatistics = ActiveDocument.Range.ReadabilityStatistics

Revisions Renvoie une collection Revisions qui représente les marques de révision dans la plage.

Dim rvsRevisions As Revisions
Set rvsRevisions = ActiveDocument.Range.Revisions

Rows Renvoie une collection Rows qui représente toutes les lignes de tableau d’une plage.

Dim rwsRows As Rows
Set rwsRows = ActiveDocument.Range.Rows

Scripts Renvoie une collection scripts qui représente la collection des scripts HTML de l’objet spécifié.

Dim scrsScripts As Office.Scripts
scrsScripts = ActiveDocument.Range.Scripts

Sections Renvoie une collection sections qui représente les sections de la plage spécifiée.

Dim sctsSections As Sections
Set sctsSections = ActiveDocument.Range.Sections

Sentences Renvoie une collection sentences qui représente toutes les phrases de la plage.

Dim sntsSentences As Sentences
Set sntsSentences = ActiveDocument.Range.Sentences

Shading Renvoie un objet Shading qui représente la mise en forme de la trame de fond pour l’objet spécifié.

Dim shdShading As Shading
Set shdShading = ActiveDocument.Range.Shading

ShapeRange Renvoie une collection ShapeRange qui représente tous les objets Shape de la plage spécifiée.

Dim sreShapeRange As ShapeRange
Set sreShapeRange = ActiveDocument.Range.ShapeRange

ShowAll True si tous les caractères non imprimables (tels que le texte masqué, marques de tabulation, d'espace et les marques de paragraphe) sont affichés.

ActiveDocument.Range.ShowAll = True

SpellingChecked True si l'orthographe a été vérifiée dans la plage spécifiée ou le document.

ActiveDocument.Range.SpellingChecked = True

SpellingErrors Renvoie une collection ProofreadingErrors qui représente les mots identifiés comme fautes d’orthographe dans la plage spécifiée.

Dim pesSpellingErrors As ProofreadingErrors
Set pesSpellingErrors = ActiveDocument.Range.SpellingErrors

Start Cette propriété renvoie ou définit la position du caractère de début d'une plage.

ActiveDocument.Range.Start =

StoryLength Renvoie le nombre de caractères dans l'article qui contient la plage spécifiée.

Dim lngStoryLength As Long
lngStoryLength = ActiveDocument.Range.StoryLength

StoryType Renvoie le type d'article pour la plage, la sélection ou le signet spécifié.

Dim wstStoryType As WdStoryType
wstStoryType = ActiveDocument.Range.StoryType

Subdocuments Renvoie une collection Subdocuments qui représente tous les sous-documents de la plage ou du document spécifié.

Dim sbdsSubdocuments As Subdocuments
Set sbdsSubdocuments = ActiveDocument.Range.Subdocuments

SynonymInfo Renvoie un objet SynonymInfo qui contient des informations du dictionnaire des synonymes sur les synonymes, les antonymes ou les mots et les expressions apparentés au contenu d’une plage.

Dim sioSynonymInfo As SynonymInfo
Set sioSynonymInfo = ActiveDocument.Range.SynonymInfo

Tables Renvoie une collection tables qui représente toutes les tables de la plage spécifiée.

Dim tblsTables As Tables
Set tblsTables = ActiveDocument.Range.Tables

Text Cette propriété renvoie ou définit le texte de la plage spécifiée ou la sélection.

ActiveDocument.Range.Text =

TextRetrievalMode Renvoie un objet TextRetrievalMode qui contrôle la manière dont le texte est extrait de la plagespécifiée.

ActiveDocument.Range.TextRetrievalMode =

TopLevelTables Renvoie une collection tables qui représente les tableaux dont le niveau d’imbrication est le plus à l’extérieur de la plage actuelle.

Dim tblsTopLevelTables As Tables
Set tblsTopLevelTables = ActiveDocument.Range.TopLevelTables

TwoLinesInOne Cette propriété renvoie ou définit si Microsoft Word définit deux lignes de texte dans un et spécifie les caractères qui entourent le texte, le cas échéant.

ActiveDocument.Range.TwoLinesInOne = wdTwoLinesInOneAngleBrackets

Underline Cette propriété renvoie ou définit le type de soulignement appliqué à une plage.

ActiveDocument.Range.Underline = wdUnderlineDash

Updates Renvoie un objet de collection CoAuthUpdates qui représente toutes les mises à jour qui ont été fusionnés dans la plage spécifiée au niveau du dernier enregistrement explicite.

Dim causUpdates As CoAuthUpdates
Set causUpdates = ActiveDocument.Range.Updates

WordOpenXML Renvoie une chaîne qui représente les données XML contenues dans la plage au format Open XML de Microsoft Word.

Dim strWordOpenXML As String
strWordOpenXML = ActiveDocument.Range.WordOpenXML

Words Renvoie une collection Words qui représente tous les mots d’une plage.

Dim wrdsWords As Words
Set wrdsWords = ActiveDocument.Range.Words

XML Renvoie une valeur de type String qui représente le texte XML dans l’objet spécifié.

Dim strXML As String
strXML = ActiveDocument.Range.XML

Sentences.Count Renvoie un type long qui représente le nombre de phrases dans la collection.

Dim lngCount As Long
lngCount = ActiveDocument.Sentences.Count

Sentences.First Renvoie un objet Range qui représente la première phrase d’une collection de phrases dans un document, une plage ou une sélection.

Dim rngFirst As Range
Set rngFirst = ActiveDocument.Sentences.First

Sentences.Last Renvoie un objet Range qui représente la dernière phrase d’un document, d’une sélection ou d’une plage.

Dim rngLast As Range
Set rngLast = ActiveDocument.Sentences.Last

Sentences.Parent Renvoie un type de données Object qui représente l'objet parent de l'objet Sentences spécifié.

Dim objParent As Object
Set objParent = ActiveDocument.Sentences.Parent

StoryRanges.Count Renvoie un type long qui représente le nombre de plages d'articles dans la collection.

Dim lngCount As Long
lngCount = ActiveDocument.StoryRanges.Count

StoryRanges.Parent Renvoie un Object qui représente l'objet parent de l'objet StoryRanges spécifié.

Dim objParent As Object
Set objParent = ActiveDocument.StoryRanges.Parent

Words.Count Renvoie un type long qui représente le nombre de mots dans la collection.

Dim lngCount As Long
lngCount = ActiveDocument.Words.Count

Words.First Renvoie un objet Range qui représente le premier mot dans une collection de mots.

Dim rngFirst As Range
Set rngFirst = ActiveDocument.Words.First

Words.Last Renvoie un objet Range qui représente le dernier mot dans une collection de mots.

Dim rngLast As Range
Set rngLast = ActiveDocument.Words.Last

Words.Parent Renvoie un Object qui représente l'objet parent de l'objet Words spécifié.

Dim objParent As Object
Set objParent = ActiveDocument.Words.Parent