Freigeben über


View.ScrollShapeIntoView-Methode (Publisher)

Verschiebt den Fensterinhalt des Publikationsfensters, sodass die angegebene Form im Publikationsfenster oder -bereich angezeigt wird.

Syntax

Ausdruck. ScrollShapeIntoView (Shape)

Ausdruck Eine Variable, die ein View-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
Shape Erforderlich Shape Die Form, die durch ein Verschieben des Fensterinhalts in der Ansicht zu sehen sein soll.

Beispiel

In diesem Beispiel wird eine Form einer neuen Seite hinzugefügt und der Fensterinhalt verschoben, sodass die neue Form in der Ansicht angezeigt wird.

Sub ScrollIntoView() 
 Dim shpStar As Shape 
 Dim intWidth As Integer 
 Dim intHeight As Integer 
 
 With ActiveDocument 
 intWidth = .PageSetup.PageWidth 
 intWidth = (intWidth / 2) - 75 
 intHeight = .PageSetup.PageHeight 
 intHeight = (intHeight / 2) - 75 
 
 With .Pages.Add(Count:=1, After:=ActiveDocument.Pages.Count) 
 Set shpStar = .Shapes.AddShape(Type:=msoShape5pointStar, _ 
 Left:=intWidth, Top:=intHeight, Width:=150, Height:=150) 
 shpStar.TextFrame.TextRange.Text = "New Star Shape" 
 End With 
 End With 
 
 ActiveView.ScrollShapeIntoView Shape:=shpStar 
 
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.