_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. Single de somente leitura.
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 que o exemplo funcione, a forma um precisa 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 que o exemplo funcione, a forma um precisa 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 que o exemplo funcione, a forma um precisa 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 de linha de texto explicativo para a caixa de texto somente se o texto explicativo tiver um valor de soltar explicitamente definido , ou seja, se o valor da propriedade for DropType msoCalloutDropCustom.