Propriedade CalloutFormat.Drop (Publisher)

Para textos explicativos com explicitamente definido drop valor, essa propriedade retorna a distância vertical a partir da borda da caixa delimitadora até o lugar onde a linha de texto explicativo é anexada à caixa de texto de texto.

Essa distância é medida a partir da parte superior da caixa de texto, a menos que a propriedade AutoAttach seja definida como True e a caixa de texto esteja à esquerda da origem da linha do balão (para onde o balão aponta). Nesse caso, a distância de posicionamento é medida da parte inferior da caixa de texto. Somente leitura Variant.

Sintaxe

mais simples. Soltar

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

Valor de retorno

Variant

Comentários

Os valores numéricos são avaliados em pontos; As cadeias de caracteres podem estar em qualquer unidade com suporte do Microsoft Publisher (por exemplo, "2,5 pol").

Use o método CustomDrop para definir o valor dessa propriedade.

O valor dessa propriedade reflete com precisão a posição do anexo da linha de texto explicativo à caixa de texto somente se o texto explicativo tiver um valor de descarte definido explicitamente, ou seja, se o valor da propriedade DropType for msoCalloutDropCustom.

Exemplo

Este exemplo substitui o posicionamento personalizado da primeira forma na publicação ativa por um de dois posicionamentos predefinidos, dependendo se o valor do posicionamento personalizado é maior ou menor do que a metade da altura da caixa de texto explicativo. Para que o exemplo funcione, a forma deve ser um texto explicativo.

With ActiveDocument.Pages(1).Shapes(1).Callout 
 If .DropType = msoCalloutDropCustom Then 
 If .Drop < .Parent.Height / 2 Then 
 .PresetDrop DropType:=msoCalloutDropTop 
 Else 
 .PresetDrop DropType:=msoCalloutDropBottom 
 End If 
 End If 
End With 

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.