Making Sure an Item Is Displayed in the Window : Document Format « Word « VBA / Excel / Access / Word

1. VBA / Excel / Access / Word
2. Word
3. Document Format

Making Sure an Item Is Displayed in the Window

 
Sub range()
    Dim rngFirstList As Range
    Set rngFirstList = ActiveDocument.Lists(1).Range
    ActiveDocument.Windows(1).ScrollIntoView Obj:=rngFirstList, Start:=False
    rngFirstList.Select
    Selection.Collapse Direction:=wdCollapseEnd
    Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdMove
End Sub

 

Related examples in the same category