vba - ドキュメント内のテキストを検索する MS Word の VBA

Question

https://stackoverflow.com/a/11624006/1553562

ユーザーから入力されたドキュメントの限られた範囲に検索を制限するにはどうすればよいですか???

Answer 1

これにより、3 ページから 20 ページまでの範囲を指定できます。

Sub Sample()
    Dim rng As Range
    Dim StartPage As Long, EndPage As Long

    StartPage = 3: EndPage = 20

    Selection.GoTo What:=wdGoToPage, Which:=wdGoToAbsolute, Count:=StartPage

    Set rng = Selection.Range

    Selection.GoTo What:=wdGoToPage, Which:=wdGoToAbsolute, Count:=EndPage

    rng.End = Selection.Bookmarks("\Page").Range.End

    '~~> Now you have got your range. Do the necessary action here
    With rng

    End With
End Sub