VSTO 2007: how do I determine the page and paragraph number of a Range?

The Problem (Q-score 2, ranked #25th of 32 in the Word VBA archive)

The scenario as originally posted in 2009

I’m building an MS Word add-in that has to gather all comment balloons from a document and summarize them in a list. My result will be a list of ReviewItem classes containing the Comment itself, the paragraph number and the page number on which the commented text resides.

Part of my code looks like this:

    private static List<ReviewItem> FindComments()
    {
        List<ReviewItem> result = new List<ReviewItem>();
        foreach (Comment c in WorkingDoc.Comments)
        {
            ReviewItem item = new ReviewItem()
            {
                Remark = c.Reference.Text,
                Paragraph = c.Scope. ???, // How to determine the paragraph number?
                Page = c.Scope. ??? // How to determine the page number?
            };
            result.Add(item);
        }
        return result;
   }

The Scope property of the Comment class points to the actual text in the document the comment is about and is of type Microsoft.Office.Interop.Word.Range. I can’t work out how to determine what page and which paragraph that range is located.

With paragraph number, I actually mean the “numbered list” number of the paragraph, such as “2.3” or “1.3.2”.

Any suggestions? Thanks!

Why community consensus is tight on this one

Across 32 Word VBA entries in the archive, the accepted answer here holds solid answer (above median) status — meaning voters are unusually aligned on the right fix.

The Verified Solution — solid answer (above median) (+9)

Advisory answer — community consensus with reference links

Note: the verified answer below is a reference / advisory response rather than a copy-ready snippet.

Try this for page number:

Page = c.Scope.Information(wdActiveEndPageNumber);

Which should give you a page number for the end value of the range. If you want the page value for the beginning, try this first:

Word.Range rng = c.Scope.Collapse(wdCollapseStart);
Page = rng.Information(wdActiveEndPageNumber);

• Range.Information Property
• WdInformation Enumeration

For paragraph number, see what you can get from this:

c.Scope.Paragraphs; //Returns a paragraphs collection

My guess is to take the first paragraph object in the collection the above returns, get a new range from the end of that paragraph to the beginning of the document and grab the integer value of this:

[range].Paragraphs.Count; //Returns int

This should give the accurate paragraph number of the beginning of the comment range.

• Range.Paragraphs
• Paragraph Object Members

When to Use It — vintage (14+ years old, pre-2013)

Ranked #25th in its category — specialized fit

This pattern sits in the 53% tail relative to the top answer. Reach for it when your scenario closely matches the question title; otherwise browse the Word VBA archive for a higher-consensus alternative.

What changed between 2009 and 2026

The answer is 17 years old. The Word VBA object model has been stable across Office 2013, 2016, 2019, 2021, 365, and 2024/2026 LTSC, so the pattern still compiles. Changes that might affect you: 64-bit API declarations (use PtrSafe), blocked macros in downloaded files (Mark-of-the-Web), and the shift toward Office Scripts for web-first workflows.