OriginalPage Property [Visio 2003 SDK Documentation]

Returns the Page object that represents the original Microsoft Office Visio 2003 drawing page that was marked up on separate markup overlays by reviewers of the drawing.

objRet = object.OriginalPage

objRet   The Page object that represents the original page.

object    Required. An expression that returns a Page object. The markup overlay.

Version added

2003

Remarks

If object is not a markup overlay, OriginalPage returns an error. To determine if a page is a markup overlay, check to see whether Page.Type = visTypeMarkup (3).

When a user clicks Track Markup, Visio creates a new page of type visTypeMarkup. The original page has type visTypeForeground or visTypeBackground. Each markup overlay is associated with a unique original drawing page.

Example

This Microsoft Visual Basic for Applications (VBA) macro uses the OriginalPage property to get the name of the original page that was marked up on a markup overlay and display it in the Immediate window. Before running this macro, make sure that a drawing page is displayed in the active window.

Public Sub OriginalPage_Example()

    'Turn on Track Markup to make a markup overlay the active page. 
    Application.ActiveDocument.DocumentSheet.CellsSRC(visSectionObject, visRowDoc, visDocAddMarkup).FormulaU = True

    'Display the name of the original page that currently is being marked up. 
    Debug.Print ActivePage.OriginalPage.Name
    
End Sub

Applies to | Page object

See Also | ReviewerID property | ReviewerMarkupVisible property