3 Effektive Möglichkeiten zum Durchsuchen nach Textfeldern in Ihrem Word-Dokument

In diesem Artikel zeigen wir Ihnen gerne drei effektive Möglichkeiten zum Durchsuchen von Textfeldern in Ihrem Word-Dokument.

In Word gibt es den Befehl „Objekt durchsuchen auswählen“, mit dem Sie nur die von Ihnen ausgewählten Objekte durchsuchen können. Sie können beispielsweise nach Tabelle oder Seite suchen. Leider gibt es keine eingebaute Funktion zum Durchsuchen von Textfeldern. Daher bieten wir Ihnen drei Möglichkeiten, dies zu tun.

Methode 1: Verwenden Sie die Tabulatortaste

1. Drücken Sie zunächst „Strg + Pos1“, um zum Anfang eines Dokuments zu gelangen.
2. Suchen Sie dann das erste Textfeld und klicken Sie darauf.
3. Drücken Sie anschließend die Tabulatortaste, um zum nächsten Textfeld zu springen.

Auf diese Weise finden Sie übrigens auch Formen und Bilder im Dokument.

Methode 2: Führen Sie das Makro aus, um von einem Textfeld zum anderen zu springen

1. Drücken Sie zunächst „Alt+F11“, um den VBA-Editor in Word zu öffnen.
2. Klicken Sie anschließend auf "Normal".
3. Klicken Sie dann auf "Einfügen" und wählen Sie "Modul" in seinem Dropdown-Menü.
4. Öffnen Sie das neue Modul per Doppelklick.
5. Fügen Sie nun im Codierungsbereich folgende Codes ein:

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. Klicken Sie in der Menüleiste auf die Schaltfläche „Ausführen“ oder drücken Sie „F5“, um die Codes auszuführen.

Sobald Sie das Makro starten, erscheint eine Meldungsbox, beispielsweise die folgende:

Auf dem Feld wird der Inhalt des aktuell ausgewählten Textfelds angezeigt. Sie können auf "Ja" klicken, um das Programm anzuhalten, wenn es sich um das gewünschte Textfeld handelt. Andernfalls klicken Sie auf "Nein", um zum nächsten Textfeld zu gelangen.

Methode 3: Suchen Sie ein bestimmtes Textfeld

Wenn Sie den Titel für ein Textfeld im Dokument festlegen, können Sie ihn in Kombination mit dem folgenden Makro verwenden, um ihn sofort zu finden.

1. Lesen Sie zunächst die Schritte in Methode 2, um ein Makro zu installieren und auszuführen.
2. Denken Sie dann daran, das Makro durch dieses zu ersetzen:

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. Geben Sie im nun erscheinenden Eingabefeld den Titel des gesuchten Textfelds ein und klicken Sie auf „OK“, um fortzufahren. Das gewünschte Textfeld wird anschließend ausgewählt.

Mit Datenverlust umgehen

Da Word zu den meistgenutzten Softwareprogrammen gehört, ist es wichtig, einige Tricks zu kennen, falls Word nicht mehr reagiert. korruptes DokumentSie haben nur die Wahl, es wiederherzustellen. Dazu müssen Sie sorgfältig ein Drittanbieter-Tool auswählen, dem Sie vertrauen können.

Einführung des Autors:

Vera Chen ist eine Datenrettungsexpertin in DataNumen, Inc., das weltweit führend bei Datenwiederherstellungstechnologien ist, einschließlich korruptes xlsx und pdf Reparatur von Softwareprodukten. Für weitere Informationen besuchen Sie www.datanumen.com €XNUMX