Page.OriginalPage-Eigenschaft (Visio)

Artikel
04/07/2023

Gibt das Page-Objekt zurück, das das ursprüngliche Microsoft Visio-Zeichenblatt darstellt, das von Bearbeitern der Zeichnung auf separaten Markupüberlagerungen markiert wurde. Schreibgeschützt.

Syntax

Ausdruck. OriginalPage

Ausdruck Eine Variable, die ein Page-Objekt darstellt.

Rückgabewert

Seite

Hinweise

Wenn das übergeordnete Page-Objekt keine Markupüberlagerung ist, gibt OriginalPage einen Fehler zurück. Um festzustellen, ob eine Seite eine Markupüberlagerung ist, überprüfen Sie, ob Page.Type = visTypeMarkup (3) ist.

Wenn ein Benutzer auf Änderungen markieren klickt, wird ein neues Zeichenblatt vom Typ visTypeMarkup von Visio erstellt. Das ursprüngliche Zeichenblatt ist vom Typ visTypeForeground oder visTypeBackground. Jede Markupüberlagerung ist einem eindeutigen ursprünglichen Zeichenblatt zugeordnet.

Beispiel

Dieses VBA-Makro (Microsoft Visual Basic for Applications) verwendet die OriginalPage-Eigenschaft, um den Namen der ursprünglichen Seite abzurufen, die auf einer Markupüberlagerung markiert wurde, und sie im Direktfenster anzuzeigen. Stellen Sie vor dem Ausführen dieses Makros sicher, dass im aktiven Fenster ein Zeichenblatt angezeigt wird.

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 und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.

Freigeben über