_Chart.DropDowns(Object) Método
Definição
Importante
Algumas informações se referem a produtos de pré-lançamento que podem ser substancialmente modificados antes do lançamento. A Microsoft não oferece garantias, expressas ou implícitas, das informações aqui fornecidas.
Para textos explicativos com um valor de posicionamento explicitamente definido, essa propriedade retorna a distância vertical (em pontos) da extremidade da caixa delimitadora de texto até o lugar onde a linha do texto explicativo é anexada à caixa de texto. Somente leitura único.
public object DropDowns (object Index);
Public Function DropDowns (Optional Index As Object) As Object
Parâmetros
- Index
- Object
Retornos
Retorna Object.
Exemplos
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.
<span class="label">Set myDocument = Worksheets(1)
With myDocument.Shapes(1).Callout
If .DropType = msoCalloutDropCustom Then
If .</span>
<i>Drop</i>
<span class="label">< .Parent.Height / 2 Then .PresetDrop msoCalloutDropTop Else .PresetDrop msoCalloutDropBottom End If End If End With</span>
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.
<span class="label">Set myDocument = Worksheets(1)
With myDocument.Shapes(1).Callout
If .DropType = msoCalloutDropCustom Then
If .</span>
<i>Drop</i>
<span class="label">< .Parent.Height / 2 Then .PresetDrop msoCalloutDropTop Else .PresetDrop msoCalloutDropBottom End If End If End With</span>
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.
<span class="label">Set myDocument = Worksheets(1)
With myDocument.Shapes(1).Callout
If .DropType = msoCalloutDropCustom Then
If .</span>
<i>Drop</i>
<span class="label">< .Parent.Height / 2 Then .PresetDrop msoCalloutDropTop Else .PresetDrop msoCalloutDropBottom End If End If End With</span>
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 de texto explicativo (o local para o qual o texto explicativo aponta), sendo que no caso a distância de posicionamento é medida da parte inferior da caixa de texto.
Use o CustomDrop(Single) método para definir o valor dessa propriedade.
O valor dessa propriedade reflete com precisão a posição do anexo da linha de chamada à caixa de texto somente se a chamada tiver um valor suspenso definido explicitamente – ou seja, se o DropType valor da propriedade for msoCalloutDropCustom.