Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Devolve uma constante MsoCalloutDropType que indica onde a linha de nota de aviso é anexada à caixa de texto da nota de aviso. Somente leitura.
Sintaxe
expressão. DropType
expressão Uma variável que representa um objeto CalloutFormat .
Valor de retorno
MsoCalloutDropType
Comentários
O valor da propriedade DropType pode ser uma das constantes MsoCalloutDropType declaradas na biblioteca de tipos do Microsoft Office.
Se o texto explicativo soltar tipo é msoCalloutDropCustom, os valores das propriedades Drop e AutoAttach e as posições relativas da caixa de texto explicativo e origem da linha do texto explicativo (onde o texto explicativo aponta) são usados para determinar onde a linha de texto explicativo é anexada à caixa de texto.
Use o método PresetDrop para definir o valor dessa propriedade.
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.