Upravit

Sdílet prostřednictvím


Page.OriginalPage property (Visio)

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

Syntax

expression. OriginalPage

expression A variable that represents a Page object.

Return value

Page

Remarks

If the Page parent 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

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.