3 formas efectivas de buscar por cuadro de texto en su documento de Word

En este artículo, nos complace mostrarle 3 formas efectivas de navegar por cuadro de texto en su documento de Word.

Existe el comando "Seleccionar objeto de búsqueda" en Word que le permite examinar solo los objetos que seleccionó. Por ejemplo, puede optar por navegar por tabla o página. Desafortunadamente, no hay una función incorporada para navegar por cuadro de texto. Por lo tanto, le proporcionaremos 3 formas de hacerlo.

Método 1: usar la tecla "Tab"

1. En primer lugar, pulse “Ctrl + Inicio” para ir al principio del documento.
2. Luego busque y haga clic en el primer cuadro de texto.
3. Luego presione “Tab” para saltar al siguiente cuadro de texto.

Por cierto, de esta forma también encontrarás formas e imágenes en el documento.

Método 2: ejecutar macro para saltar de un cuadro de texto a otro

1. En primer lugar, pulse “Alt + F11” para abrir el editor de VBA en Word.
2. A continuación, haga clic en "Normal".
3. Luego haga clic en "Insertar" y seleccione "Módulo" en su menú desplegable.
4. Abra el nuevo módulo haciendo doble clic.
5. Ahora, en el área de codificación, pegue los siguientes códigos:

Sub BrowseByTextBox()
  Dim objShape As Shape
  Dim strBoxText As String
  Dim strButtonValue As String
  Dim objDoc As Document
 
  Set objDoc = ActiveDocument
 
  For Each objShape In objDoc.Shapes
    If objShape.Type = msoTextBox Then
      objShape.Select
      Selection.ShapeRange.TextFrame.TextRange.Select
      strBoxText = objShape.TextFrame.TextRange.Text
      strButtonValue = MsgBox("This text box contains: " & vbNewLine _
                       & strBoxText & vbNewLine & "Is this your desired text box?" _
                       & vbNewLine, vbYesNo, "Desired Text Box")
      If strButtonValue = vbYes Then
        Exit Sub
      End If
    End If
  Next objShape
End Sub

6. Haga clic en el botón "Ejecutar" en la barra de menú o presione "F5" para ejecutar los códigos.

Una vez que inicie la ejecución de la macro, aparecerá un cuadro de mensaje como el siguiente:

En el cuadro muestra el contenido en el cuadro de texto seleccionado actualmente. Puede hacer clic en "Sí" para detenerlo si es el cuadro de texto que desea. De lo contrario, haga clic en "No" para ir al siguiente cuadro de texto.

Método 3: buscar un cuadro de texto específico

Si configura el título para el cuadro de texto en el documento, puede usarlo en combinación con la siguiente macro para ubicarlo inmediatamente.

1. En primer lugar, consulte los pasos del método 2 para instalar y ejecutar una macro.
2. Entonces recuerde reemplazar la macro con esta:

Sub FindASpecificTextBox()
  Dim objShape As Shape
  Dim strBoxTitle As String
  Dim objInlineShape As InlineShape
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
 
  Set objDoc = ActiveDocument
  strBoxTitle = InputBox("Enter the title of the text box to be found here: ")
 
  For Each objShape In objDoc.Shapes
    If objShape.Type = msoTextBox Then
      objShape.Select
      Selection.ShapeRange.TextFrame.TextRange.Select
      If objShape.Title = strBoxTitle Then
        Exit Sub
      End If
    End If
  Next objShape
  For Each objInlineShape In objDoc.InlineShapes
    If objInlineShape.Type = msoTextBox Then
      objInlineShape.Select
      Selection.ShapeRange.TextFrame.TextRange.Select
      If objInlineShape.Title = strBoxTitle Then
        Exit Sub
      End If
    End If
  Next objInlineShape
 
  Application.ScreenUpdating = True
End Sub

3. A continuación, en el cuadro de texto que aparece, escriba el título del cuadro de texto que desea seleccionar y haga clic en «Aceptar» para continuar. Verá el cuadro de texto seleccionado.

Hacer frente a la pérdida de datos

Dado que Word es uno de los programas más utilizados, es necesario conocer algunos trucos cuando Word deja de responder. Para asuntos importantes doc corrupto, tu única opción es recuperarlo. Y para hacer esto, debe elegir cuidadosamente una herramienta de terceros en la que pueda confiar.

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 xlsx corrupto y pdf reparar productos de software. Para más información visite www.datanumen.com