Partager via


Méthode Document.Range (Word)

Renvoie un objet Range en de départ spécifié et les positions de caractère de fin.

Syntaxe

expression. Plage (début, fin)

expression Obligatoire. Variable qui représente un objet Document.

Parameters

Nom Requis/Facultatif Type de données Description
Start Facultatif Variant Position du caractère de début.
End Facultatif Variant Position du caractère de fin.

Valeur renvoyée

Plage

Exemple

Cet exemple montre comment appliquer le format gras aux 10 premiers caractères du document actif.

Sub DocumentRange() 
 ActiveDocument.Range(Start:=0, End:=10).Bold = True 
End Sub

Cet exemple montre comment créer une plage commençant au début du document actif et se terminant à l'emplacement du curseur, puis mettre en majuscules tous les caractères appartenant à cette plage.

Sub DocumentRange2() 
 Dim r As Range 
 Set r = ActiveDocument.Range(Start:=0, End:=Selection.End) 
 r.Case = wdUpperCase 
End Sub

Cet exemple montre comment créer et définir la variable myRange sur des paragraphes de deux à quatre dans le document actif, puis aligner à droite les paragraphes de la plage.

Sub DocumentRange3() 
 Dim aDoc As Document 
 Dim myRange As Range 
 Set aDoc = ActiveDocument 
 If aDoc.Paragraphs.Count >= 6 Then 
 Set myRange = aDoc.Range(aDoc.Paragraphs(2).Range.Start, _ 
 aDoc.Paragraphs(4).Range.End) 
 myRange.Paragraphs.Alignment = wdAlignParagraphRight 
 End If 
End Sub

Voir aussi

Objet Document

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.