Table of contents
TOC
Recolher sumário
Expandir sumário

Propriedade ConnectorFormat.EndConnectionSite (PowerPoint)ConnectorFormat.EndConnectionSite Property (PowerPoint)

office 365 dev account|Última Atualização: 22/03/2018
|
2 Colaboradores

Retorna um número inteiro especificando o site de conexão ao qual o final de um conector está conectado. Somente leituraReturns an integer that specifies the connection site that the end of a connector is connected to. Read-only.

SintaxeSyntax

expressão. EndConnectionSiteexpression. EndConnectionSite

expressão Uma variável que representa um objeto ConnectorFormat .expression A variable that represents an ConnectorFormat object.

Valor retornadoReturn Value

LongLong

ComentáriosRemarks

Se a extremidade do conector especificado não estiver vinculada a uma forma, esta propriedade irá gerar um erro.If the end of the specified connector isn't attached to a shape, this property generates an error.

ExemploExample

Este exemplo pressupõe que o primeiro slide na apresentação ativa contém duas formas conectadas por um conector chamado "Conn1To2". O código adiciona um retângulo e um conector ao primeiro slide. O final do novo conector será conectado ao mesmo site de conexão que o final do conector chamado "Conn1To2", e o início do novo conector será conectado ao site de conexão um do novo retângulo.This example assumes that the first slide in the active presentation already contains two shapes attached by a connector named "Conn1To2." The code adds a rectangle and a connector to the first slide. The end of the new connector will be attached to the same connection site as the end of the connector named "Conn1To2," and the beginning of the new connector will be attached to connection site one on the new rectangle.

Set myDocument = ActivePresentation.Slides(1)

With myDocument.Shapes
    Set r3 = .AddShape(msoShapeRectangle, 100, 420, 200, 100)
    .AddConnector(msoConnectorCurve, 0, 0, 10, 10) _
        .Name = "Conn1To3"
    With .Item("Conn1To2").ConnectorFormat
        endConnSite1 = .EndConnectionSite
        Set endConnShape1 = .EndConnectedShape
    End With

    With .Item("Conn1To3").ConnectorFormat
        .BeginConnect r3, 1
        .EndConnect endConnShape1, endConnSite1
    End With
End With

Ver tambémSee also

ConceitosConcepts

Objeto ConnectorFormatConnectorFormat Object

© 2018 Microsoft