Método Shapes.AddCallout (Publisher)

Adiciona um novo objeto Shape que representa uma chamada de linha sem bordas à coleção Shapes especificada.

Sintaxe

expressão. AddCallout (Tipo, Esquerda, Superior, Largura, Altura)

expressão Uma variável que representa um objeto Formas.

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Type	Obrigatório	MsoCalloutType	O tipo de texto explicativo. Pode ser uma das constantes MsoCalloutType .
Left	Obrigatório	Variant	A posição da borda esquerda da forma que representa o texto explicativo.
Top	Obrigatório	Variant	A posição da borda superior da forma que representa o texto explicativo.
Width	Obrigatório	Variant	A largura da forma que representa o texto explicativo.
Height	Obrigatório	Variant	A altura da forma que representa o texto explicativo.

Valor de retorno

Forma

Comentários

Para os argumentos Esquerdo, Superior, Largura e Altura , 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").

Exemplo

O exemplo a seguir adiciona uma nova linha de texto explicativo com rotação livre à primeira página da publicação ativa.

Dim shpCallout As Shape 
 
Set shpCallout = ActiveDocument.Pages(1).Shapes.AddCallout _ 
 (Type:=msoCalloutTwo, _ 
 Left:=144, Top:=216, _ 
 Width:=36, Height:=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.