Compartir a través de


Propiedad CalloutFormat.Drop (Publisher)

Para llamadas con establecido de forma explícita colocar el valor, esta propiedad devuelve la distancia vertical desde el borde del texto del cuadro de límite hasta el lugar donde la línea de llamada se une al cuadro de texto.

Esta distancia se mide desde la parte superior del cuadro de texto a menos que la propiedad AutoAttach esté establecida en True y el cuadro de texto esté a la izquierda del origen de la línea de llamada (donde apunta la llamada). En este caso, la distancia de colocación se mide desde la parte inferior del cuadro de texto. Variant de solo lectura.

Sintaxis

expresión. Soltar

expresión Variable que representa un objeto CalloutFormat .

Valor devuelto

Variant

Observaciones

Los valores numéricos se evalúan en puntos; Las cadenas pueden estar en cualquier unidad compatible con Microsoft Publisher (por ejemplo, "2,5 in").

Utilice el método CustomDrop para establecer el valor de esta propiedad.

El valor de esta propiedad refleja con precisión la posición de los datos adjuntos de la línea de llamada al cuadro de texto solo si la llamada tiene un valor de colocación establecido explícitamente, es decir, si el valor de la propiedad DropType es msoCalloutDropCustom.

Ejemplo

En este ejemplo se reemplaza el punto de unión personalizado de la primera forma de la publicación activa por uno de los dos puntos de unión preestablecidos dependiendo de si el valor del punto de unión personalizado es mayor o menor que la mitad del alto del cuadro de texto de la llamada. Para que funcione el ejemplo, la forma debe ser una llamada.

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 

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.