View.ScrollShapeIntoView, méthode (Publisher)

Fait défiler la fenêtre de la composition de façon à ce que la forme spécifiée s’affiche dans la fenêtre ou le volet de la composition.

Syntaxe

expression. ScrollShapeIntoView (Shape)

expression Variable qui représente un objet View .

Paramètres

Nom	Requis/Facultatif	Type de données	Description
Forme	Obligatoire	Forme	Forme à faire défiler dans la vue.

Exemple

Cet exemple ajoute une forme sur une nouvelle page et fait défiler la vue active pour afficher cette nouvelle forme.

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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.