WD97: Cómo insertar un título al lado de una ecuación o un objeto

Exención de responsabilidades de contenido KB retirado

Este artículo se refiere a productos para los que Microsoft ya no ofrece soporte técnico. Por tanto, el presente artículo se ofrece "tal cual" y no será actualizado.

Resumen

Word no ofrece un método integrado para insertar automáticamente un vaciado de título con el margen derecho del documento. Muchas revistas científicas requieren objetos de ecuación en uno de dos formatos: se centra la ecuación y el título está alineado a la derecha; o bien, la ecuación es izquierda-alineado y el título está alineado a la derecha. En ambos casos, el número de título se incluye entre paréntesis. Este artículo describe varios métodos para aplicar formato a objetos de ecuación en uno de estos estilos.


NOTA: Este artículo utiliza el término "ecuación", pero este método se aplica a cualquier elemento (como una figura o una imagen) donde se necesita el título aparezca en la misma línea que el objeto.


Ejemplos de formatos de revista científica:
                              y = mx + b                            ( 1 )

-O-
y = mx + b                                                          ( 1 )

Más información

Paso 1: Configurar el título

Para crear la etiqueta de título con los paréntesis, siga estos pasos:


  1. En el menú Insertar, haga clic en título.
  2. Haga clic en nueva etiqueta.
  3. En el cuadro Etiqueta, escriba un paréntesis de apertura.
  4. Haga clic en Aceptar.
  5. En el cuadro Título, a la derecha del número, escriba un espacio.
  6. Escriba un paréntesis de cierre.
  7. Haga clic en Aceptar.
Después de crear el formato de título, puede insertar títulos adicionales haciendo lo siguiente:


  1. En el menú Insertar, haga clic en título.
  2. En el cuadro Título, a la derecha del título existente, escriba un espacio y un paréntesis de cierre.
  3. Haga clic en Aceptar.

Paso 2: Alinear la ecuación y el título

NOTA: Si piensa hacer referencias cruzadas a título, utilice el método 2.


Método 1: Establecer una ecuación y número de título alineado a la derecha:


  1. En el menú Insertar, haga clic en título.
  2. En etiqueta, seleccione el paréntesis de apertura, escriba un espacio y un paréntesis de cierre y, a continuación, haga clic en Aceptar.
  3. Mover el punto de inserción al principio de la línea, antes del título.
  4. Establecer una tabulación alineada a la derecha en el margen derecho. Por ejemplo, si el margen derecho es seis pulgadas desde el margen izquierdo, establezca la ficha alineado a la derecha en seis pulgadas haciendo lo siguiente:
    1. En el menú Formato, haga clic en las fichas.
    2. En posiciones de tabulación, escriba 6.
    3. En alineación, haga clic en derecha.
    4. Haga clic en Aceptar.
  5. Inserte la ecuación.
  6. Presione la tecla TAB para mover el título a la parte derecha de la página.


    NOTA: Al insertar la ecuación, desactive la casilla de verificación flotar sobre el texto. El objeto de ecuación debe ser un objeto entre líneas para que funcione este método.
Método 2: Establecer una una ecuación alineado a la izquierda:


  1. En una nueva línea en blanco, inserte la ecuación.


    NOTA: Al insertar la ecuación, desactive la casilla de verificación flotar sobre el texto. El objeto de ecuación debe ser un objeto entre líneas para que funcione este método.
  2. Salga del Editor de ecuaciones haciendo clic en cualquier lugar en el área del documento.
  3. Presione la tecla TAB y después inserte el título.
  4. Seleccione toda la línea que contiene la ecuación y el título. En el menú tabla, haga clic en convertir texto en tabla. La selección se convierte en una tabla de dos columnas.
  5. Quitar el borde alrededor de la tabla haciendo lo siguiente:
    1. Con la tabla seleccionada, en el menú Formato, haga clic en bordes y sombreado.
    2. En configuración, seleccione ninguno.
    3. Haga clic en Aceptar.
  6. Seleccione la celda que contiene el título y, a continuación, haga clic en el botón Alinear a la derecha de la barra de herramientas Formato.
Método 3: Establecer una ecuación centrada:


  1. En una nueva línea en blanco, presione la tecla TAB y, a continuación, insertar la ecuación.
  2. Salga del Editor de ecuaciones haciendo clic en cualquier lugar en el área del documento.


    NOTA: Al insertar la ecuación, desactive la casilla de verificación flotar sobre el texto. El objeto de ecuación debe ser un objeto entre líneas para que funcione este método.
  3. Presione la tecla TAB y después inserte el título.
  4. Seleccione toda la línea que contiene la ecuación y el título. En el menú tabla, haga clic en convertir texto en tabla. La selección se convierte en una tabla de tres columnas.
  5. Quitar el borde alrededor de la tabla haciendo lo siguiente:
    1. Con la tabla seleccionada, en el menú Formato, haga clic en bordes y sombreado.
    2. En configuración, seleccione ninguno.
    3. Haga clic en Aceptar.
  6. Seleccione la celda que contiene la ecuación y haga clic en el botón Centrar de la barra de herramientas Formato.
  7. Seleccione la celda que contiene el título y haga clic en el botón Alinear a la derecha de la barra de herramientas Formato.
Método 4: Crear una de Microsoft Visual Basic para Aplicaciones macro:


Crear una macro que automatice el proceso descrito en el método 2.


Microsoft proporciona ejemplos de programación con fines ilustrativos únicamente, sin garantía expresa o implícita, incluyendo, pero sin limitarse a, las garantías implícitas de comerciabilidad e idoneidad para un fin determinado. En este artículo se supone que está familiarizado con el lenguaje de programación que se demuestra y las herramientas utilizadas para crear y depurar procedimientos. Los profesionales de soporte técnico de Microsoft pueden explicarle la funcionalidad de un determinado procedimiento, pero no modificarán estos ejemplos para ofrecer mayor funcionalidad ni crearán procedimientos que cumplan sus necesidades específicas.
Si tiene poca experiencia en programación, desea ponerse en contacto con un Microsoft Certified Partner o servicios de consultoría de Microsoft. Para obtener más información, visite estos sitios Web de Microsoft:

Asociado certificado de Microsoft - https://partner.microsoft.com/global/30000104

Servicios de asesoría de Microsoft: http://support.microsoft.com/gp/advisoryservice

Para obtener más información acerca de las opciones de soporte están disponibles y cómo ponerse en contacto con Microsoft, visite el siguiente sitio Web de Microsoft: http://support.microsoft.com/default.aspx?scid=fh; de EN-US; CNTACTMS
   Sub CaptionRight()      Dim Align As Integer
On Error GoTo bye
If Selection.Information(wdWithInTable) Then
MsgBox "You are in a table. Please move outside of the " _
& "table to run this macro.", vbInformation
Exit Sub
End If
Align = MsgBox("Would you like the Equation to be " _
& "centered? (Selecting No will left-align the " _
& "Equation.)", vbYesNoCancel)
If Align > 2 Then
Selection.InsertParagraphAfter
Selection.Collapse (wdCollapseEnd)
W = ActiveDocument.PageSetup.PageWidth
L = ActiveDocument.PageSetup.LeftMargin
R = ActiveDocument.PageSetup.RightMargin
RTMarg = W - R - L
CaptionLabels.add Name:="("
If Align = 6 Then
tblT1 = Selection.Tables.add(Selection.Range, 1, 3)
Else
tblT1 = Selection.Tables.add(Selection.Range, 1, 2)
End If
tblT1.Select
With Selection
If Align = 6 Then
.Columns(1).Cells.Width = 50.4
.Columns(3).Cells.Width = 50.4
.Columns(2).Cells.Width = RTMarg - 100.8
'Represents 1.5" in Points
Else
.Columns(2).Cells.Width = 50.4
.Columns(1).Cells.Width = RTMarg - 50.4
'Represents .75" in Points
End If
.InsertCaption Label:="(", _
Position:=wdCaptionPositionBelow, Title:= " )"
.HomeKey unit:=wdLine, Extend:=wdExtend
.Cut
.MoveRight unit:=wdCharacter, Extend:=wdExtend
.Delete
.MoveLeft unit:=wdCharacter, Count:=2
.Paste
.Rows(1).Select
For Each x In Selection.Borders
x.LineStyle = wdLineStyleNone
Next x
.Borders.Shadow = False
.Cells(9 - Align).Select
.ParagraphFormat.Alignment = wdAlignParagraphRight
.Cells(1).VerticalAlignment = wdCellAlignVerticalCenter
.Font.Bold = True
.Rows(1).Select
If Align = 6 Then
.Cells(2).Select
.ParagraphFormat.Alignment = wdAlignParagraphCenter
.InlineShapes.AddOLEObject ClassType:="Equation.3", _
FileName:="", LinkToFile:=False, DisplayAsIcon:=False
Else
.Collapse
.InlineShapes.AddOLEObject ClassType:="Equation.3", _
FileName:="", LinkToFile:=False, DisplayAsIcon:=False
End If
End With
End If
End Sub

Existen varios métodos para insertar títulos. AutoCaption inserta un epígrafe encima o debajo de un objeto insertado; títulos insertados manualmente se colocan por encima o por debajo del objeto cuando el objeto está seleccionado o a la derecha cuando el punto de inserción está a la derecha del objeto.


Para obtener información adicional, consulte el artículo siguiente en Microsoft Knowledge Base:
173707 OFF97: cómo ejecutar código de ejemplo de artículos de Knowledge Base

Referencias

Para obtener más información acerca de cómo obtener ayuda con Visual Basic para Aplicaciones, consulte el artículo siguiente en Microsoft Knowledge Base:
163435 VBA: recursos de programación para Visual Basic para Aplicaciones
Para obtener información acerca de cómo hacer esto en versiones anteriores de Word, consulte el siguiente artículo en Microsoft Knowledge Base:
123430 WD: cómo insertar un título al lado de una ecuación o un objeto
Propiedades

Id. de artículo: 158918 - Última revisión: 01/09/2017 - Revisión: 1

Comentarios