Compartir a través de

Propiedad Page.OriginalPage (Visio)

  • Artículo

Devuelve el objeto Page que representa la página de dibujo original de Microsoft Visio marcada en superposiciones de marcado independientes por los revisores del dibujo. Solo lectura.

Sintaxis

expresión. OriginalPage

Expresión Variable que representa un objeto Page .

Valor devuelto

Page

Comentarios

Si el objeto primario de Page no es una superposición de revisiones, OriginalPage devuelve un error. Para determinar si una página es una superposición de marcado, compruebe si Page.Type = visTypeMarkup (3).

Cuando un usuario hace clic en Seguimiento de revisiones, Visio crea una nueva página de tipo visTypeMarkup. La página original es de tipo visTypeForeground o visTypeBackground. Cada superposición de revisiones se asocia a una página de dibujo original y única.

Ejemplo:

Esta macro de Microsoft Visual Basic para Aplicaciones (VBA) usa la propiedad OriginalPage para obtener el nombre de la página original marcada en una superposición de marcado y mostrarla en la ventana Inmediato. Antes de ejecutar esta macro, asegúrese de que se muestra una página de dibujo en la ventana activa.

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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.