Método CalloutFormat.CustomDrop (Word)
Establece la distancia vertical (en puntos) desde el lado del cuadro de límite del texto hasta el lugar donde la línea de la llamada se une al cuadro de texto.
Sintaxis
expresión. CustomDrop (Drop)
expresión requerida. Variable que representa un objeto "CalloutFormat".
Parameters
Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
---|---|---|---|
Drop | Obligatorio | Single | Distancia de colocación en puntos. |
Comentarios
La distancia se mide desde la parte superior del cuadro de texto, a menos que el valor de la propiedad AutoAttach sea True y el cuadro de texto esté a la izquierda del origen de la línea de la llamada (lugar al que señala la llamada), en cuyo caso la distancia de la línea de unión se mide desde la parte inferior del cuadro de texto.
Si el método PresetDrop se usó anteriormente para establecer la colocación de la llamada especificada, use la siguiente instrucción antes de usar el método CustomDrop para que la configuración de colocación personalizada surta efecto.
PresetDrop msoCalloutDropCustom
Ejemplo:
En este ejemplo, se cancela cualquier separación preestablecida para la primera forma del documento activo, se establece la distancia de separación personalizada en 14 puntos y se especifica que la distancia de separación se mida siempre desde la parte superior. Para que funcione el ejemplo, la primera forma debe ser una llamada.
Dim docActive As Document
Set docActive = ActiveDocument
With docActive.Shapes(1).Callout
.PresetDrop msoCalloutDropCustom
.CustomDrop 14
.AutoAttach = False
End With
Consulte también
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.