Range.PreviousSubdocument (Word)

Déplace la plage vers le sous-document précédent.

S'il n'existe aucun autre sous-document, une erreur se produit.

If ActiveDocument.Subdocuments.Count >= 1 Then 
 ActiveDocument.ActiveWindow.View.Type = wdMasterView 
 Selection.EndKey Unit:=wdStory, Extend:=wdMove 
 Selection.PreviousSubdocument 
End If