Propriedade CalloutFormat.Drop (Excel)

Para textos explicativos com um valor de descarte definido explicitamente, essa propriedade retorna a distância vertical (em pontos) da borda da caixa delimitadora de texto até o local onde a linha do texto explicativo é anexada à caixa de texto. Somente leitura único.

Sintaxe

mais simples. Soltar

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

Comentários

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 (o local para o qual o balão aponta), caso em que a distância para o qual o balão aponta é medida a partir da parte inferior da caixa de texto.

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 forma um de myDocument por um dentre dois posicionamentos predefinidos, dependendo do valor do posicionamento personalizado ser maior ou menor que a metade da altura da caixa do texto explicativo. Para o exemplo funcionar, a forma um deve ser um texto explicativo.

Set myDocument = Worksheets(1) 
With myDocument.Shapes(1).Callout 
 If .DropType = msoCalloutDropCustom Then 
 If .Drop < .Parent.Height / 2 Then 
 .PresetDrop msoCalloutDropTop 
 Else 
 .PresetDrop 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.