Propiedad CalloutFormat.AutoAttach (Publisher)

Devuelve o establece una constante MsoTriState que indica si el lugar donde se adjunta la línea de llamada al cuadro de texto de la llamada cambia en función de si el origen de la línea de llamada (donde apunta la llamada) es a la izquierda o a la derecha del cuadro de texto de la llamada. Lectura y escritura.

Sintaxis

expresión. AutoAttach

expresión Variable que representa un objeto CalloutFormat .

Valor devuelto

MsoTriState

Observaciones

El valor de la propiedad AutoAttach puede ser una de las constantes MsoTriState declaradas en la biblioteca de tipos de Microsoft Office.

Cuando el valor de esta propiedad es msoTrue, el valor de colocación (distancia vertical desde el borde del cuadro de texto de la llamada hasta el lugar donde se adjunta la línea de llamada) se mide desde la parte superior del cuadro de texto cuando el cuadro de texto está a la derecha del origen y, a continuación, se mide desde la parte inferior del cuadro de texto cuando el cuadro de texto está a la izquierda del origen.

Cuando el valor de esta propiedad es msoFalse, el valor de colocación siempre se mide desde la parte superior del cuadro de texto, independientemente de las posiciones relativas del cuadro de texto y el origen. Utilice el método CustomDrop para establecer el valor de drop y utilice la propiedad Drop para devolver el valor de colocación.

Establecer esta propiedad afecta a una llamada solo si tiene un valor de colocación establecido explícitamente, es decir, si el valor de la propiedad DropType es msoCalloutDropCustom. De forma predeterminada, al crear las llamadas se establecen explícitamente sus valores de punto de unión.

Ejemplo

En este ejemplo se agregan dos llamadas a la primera página. Una de las llamadas se agrega automáticamente y la otra no. Si cambia el origen de la línea de llamada de la llamada que se agregó automáticamente y lo coloca a la derecha del cuadro de texto adjunto, cambiará la posición del cuadro de texto. La llamada que no se agrega automáticamente no actúa de la misma manera.

With ActivePublication.Pages(1).Shapes 
 With .AddCallout(Type:=msoCalloutTwo, _ 
 Left:=420, Top:=170, Width:=200, Height:=50) 
 .TextFrame.TextRange.Text = "auto-attached" 
 .Callout.AutoAttach = msoTrue 
 End With 
 With .AddCallout(Type:=msoCalloutTwo, _ 
 Left:=420, Top:=350, Width:=200, Height:=50) 
 .TextFrame.TextRange.Text = "not auto-attached" 
 .Callout.AutoAttach = msoFalse 
 End With 
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.