Método Shapes.AddConnector (Publisher)
Adiciona um novo objeto Shape que representa um conector à coleção Shapes especificada.
Sintaxe
expressão. AddConnector (Type, BeginX, BeginY, EndX, EndY)
expressão Uma variável que representa um objeto Formas.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| Type | Obrigatório | MsoConnectorType | O tipo de conector a ser adicionado. Pode ser uma das constantes MsoConnectorType , exceto msoConnectorTypeMixed, que não é usada com esse método. |
| InícioX | Obrigatório | Variant | A coordenada x do ponto inicial do conector. |
| InícioY | Obrigatório | Variant | A coordenada y do ponto inicial do conector. |
| EndX | Obrigatório | Variant | A coordenada x do ponto final do conector. |
| EndY | Obrigatório | Variant | A coordenada y do ponto final do conector. |
Valor de retorno
Forma
Comentários
Para os parâmetros BeginX, BeginY, EndX e EndY , os valores numéricos são avaliados em pontos; cadeias de caracteres podem estar em todas as unidades com suporte do Microsoft Publisher (por exemplo, "2.5 in").
O novo conector não está conectado a qualquer outra forma; Use os métodos BeginConnect e EndConnect para conectar o novo conector a uma outra forma.
Exemplo
O exemplo a seguir adiciona um novo conector reto à primeira página da publicação ativa.
Dim shpConnect As Shape
Set shpConnect = ActiveDocument.Pages(1).Shapes.AddConnector _
(Type:=msoConnectorStraight, _
BeginX:=144, BeginY:=144, _
EndX:=180, EndY:=72)
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.