Return Page Number of Paragraph Number

gmayor · #1 03-04-2021, 05:03 AM

It will show page 2 - the clue is in the information sought by the function.
If you want the page number it starts on then collapse the range to its start before asking the question e.g.

Code:

Dim iStart As Integer, iEnd As Integer
    With Selection.Paragraphs(1).Range
        iEnd = .Information(wdActiveEndPageNumber)
        .Collapse 1
        iStart = .Information(wdActiveEndPageNumber)
        MsgBox "Starts on page " & iStart & vbCr & "Ends on page " & iEnd
    End With

SamDsouza · #2 03-04-2021, 09:37 PM

Thank you sir for the clarification and indeed a valuable input of .Collapse

SamD

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Return as many Y as the number of occurrence of values in another column	Marcia	Excel	2	11-27-2020 04:19 PM
Table of content to include a page number comprising Section and page number	Allen001	Word	2	11-25-2019 05:38 AM
Excel Match return different row number	kimak	Excel	1	03-01-2017 09:39 AM
How do I create a field that will return the current paragraph number minus one in an automatic list	gugootz	Word	1	11-23-2015 04:58 PM
Page number with chapter number but not from Heading 1	alpruett	Word	5	06-04-2014 02:00 PM