2 formas correctas de cambiar el nombre de un marcador en su documento de Word

Comparte ahora:

En el siguiente artículo, nos gustaría brindarle 2 formas correctas de cambiar el nombre de un marcador en su documento de Word.

Al redactar un documento de Word extenso, los marcadores y las referencias cruzadas pueden convertirse en nuestro mejor amigo al ahorrarnos mucho tiempo al volver a explicar el mismo punto. Sin embargo, puede ocurrir un problema inesperado. Por ejemplo, si cambia el nombre de un marcador y actualiza las referencias cruzadas, ciertamente fallará y terminará con errores de referencia como los siguientes:Error de referencia

La razón es que cuando modificaste el nombre del marcador, lo borraste accidentalmente. Ahora le mostraremos 2 métodos para abordar este problema.

Método 1: cambiar el nombre del marcador y actualizar las referencias cruzadas manualmente

  1. A starDesactivado, haga clic en la pestaña "Insertar" y luego haga clic en "Marcador" en el grupo "Enlaces".Haga clic en "Insertar" -> Haga clic en "Marcador"
  2. Luego haga clic para seleccionar el tarconsiga el marcador y haga clic en "Ir a".
  3. Verá que los textos de los marcadores están seleccionados para entonces. Haga clic en "Eliminar".Elija Marcador-> Haga clic en "Ir a" -> Haga clic en "Eliminar"
  4. Luego ingrese un nuevo nombre de marcador y haga clic en "Agregar".
  5. Presione "Alt + F9" para mostrar los códigos de campo.Presione "Alt + F9" para mostrar los códigos de campo
  6. En caso de que tenga varias referencias cruzadas, le recomendamos que utilice la función "Buscar y reemplazar". Simplemente presione "Ctrl + H" para invocar el cuadro de diálogo "Buscar y reemplazar".
  7. Ahora ingrese "REF DWORDR" en el cuadro de texto "Buscar qué" y "REF DWORDR2" en el "Reemplazar con". “DWORDR” es el nombre del marcador original y “DWORDR2” es el nuevo.
  8. A continuación, haga clic en "Reemplazar todo".Ingrese los nombres de los marcadores -> Haga clic en "Reemplazar todo"
  9. Cierre el cuadro "Buscar y reemplazar" y presione "Alt + F9" para mostrar el contenido de referencia nuevamente.
  10. Luego presione "Ctrl + A" y "F9" al lado para actualizar todos los campos en el documento.

Cuando mueve el cursor sobre la referencia cruzada, puede ver el nombre del nuevo marcador en el cuadro de sugerencias de la pantalla.El efecto

Método 2: cambie el nombre del marcador y actualice las referencias cruzadas a través de VBA

  1. En primer lugar, presione "Alt + F11" para activar el editor de VBA.
  2. Vaya al proyecto "Normal" para insertar un nuevo módulo haciendo clic en la pestaña "Insertar" primero.
  3. Luego elija "Módulo" en su menú desplegable.Haga clic en "Normal" -> Haga clic en "Insertar" -> Haga clic en "Módulo"
  4. Haga doble clic en el módulo recién creado para abrir el espacio de edición en el lado derecho.
  5. Luego pegue la siguiente macro allí:
Sub ChangeTheBookMarkNameAndUpdateCrossReference()
  Dim strBookMarkName As String
  Dim strNewName As String
  Dim objBookMarkRange As Range
  Dim objField As Field
  Dim strFieldCode As String
 
  '  Rename the bookmark name.
  strBookMarkName = InputBox("Enter the bookmark name which you want to change", "BookMark Name", "For example: DWORDR")
  strNewName = InputBox("Enter the New bookmark Name", "New Bookmark Name", "For example: New text")
 
  With ActiveDocument
    If .Bookmarks.Exists(strBookMarkName) Then
      Set objBookMarkRange = .Bookmarks(strBookMarkName).Range
      .Bookmarks(strBookMarkName).Delete
      .Bookmarks.Add Name:=strNewName, Range:=objBookMarkRange
 
      '  Update the cross-reference
      If .Fields.Count >= 1 Then
        For Each objField In .Fields
          strFieldCode = objField.Code.Text
          If strFieldCode = " REF " & strBookMarkName & " \h " Then
            objField.Code.Text = Replace(strFieldCode, strBookMarkName, strNewName, , 1, vbTextCompare)
            objField.Update
            MsgBox ("Code = " & objField.Code & vbCr & "Result = " & objField.Result & vbCr)
          End If 
        Next objField 
      End If
    Else
      MsgBox ("The Bookmark: " & strBookMarkName & " is not founded.")
    End If
  End With

  Set objBookMarkRange = Nothing
End Sub
  1. Haga clic en "Ejecutar" o presione "F5".Pegar códigos-> Haga clic en "Ejecutar"
  2. Ahora ingrese el nombre del marcador original en el primer cuadro que aparece y haga clic en "Aceptar".Ingrese el nombre original-> Haga clic en "Aceptar"
  3. Ingrese el nuevo nombre en el segundo y haga clic en "Aceptar".Ingrese el nuevo nombre del marcador-> Haga clic en "Aceptar"

Por último, habrá un cuadro que le mostrará el resultado.Cuadro que muestra el resultado

Cuidar documentos de Word

La cost creando palabra corrupta documento no se limita a pérdidas comerciales asombrosas, sino que también hace que las personas se angustien emocionalmente. Por lo tanto, es extremadamente necesario tomar medidas preventivas para evitar los desafortunados, como hacer copias de seguridad de los documentos.

Introducción del autor:

Vera Chen es experta en recuperación de datos en DataNumen, Inc., que es el líder mundial en tecnologías de recuperación de datos, incluyendo reparación xlsx y pdf reparar productos de software. Para más información visite www.datanumen.com

Comparte ahora:

Los comentarios están cerrados.