3 efektīvi veidi, kā pārlūkot teksta lodziņu jūsu Word dokumentā

Šajā rakstā mēs esam priecīgi jums parādīt 3 efektīvus veidus, kā Word dokumentā pārlūkot pēc tekstlodziņa.

Programmā Word ir komanda “Select Browse Object”, kas ļauj pārlūkot tikai atlasītos objektus. Piemēram, varat izvēlēties pārlūkot pēc tabulas vai lapas. Diemžēl nav iebūvētas funkcijas pārlūkošanai pēc tekstlodziņa. Tāpēc mēs jums piedāvāsim 3 veidus, kā to izdarīt.

1. metode: izmantojiet taustiņu “Tab”

1. Vispirms nospiediet taustiņu kombināciju “Ctrl+Home”, lai atgrieztos dokumenta sākumā.
2. Pēc tam atrodiet pirmo tekstlodziņu un noklikšķiniet uz tā.
3. Pēc tam nospiediet taustiņu "Tab", lai pārietu uz nākamo tekstlodziņu.

Starp citu, šādā veidā jūs atradīsit arī formas un attēlus dokumentā.

2. metode: palaidiet makro, lai pārietu no viena tekstlodziņa uz citu

1. Pirmkārt un galvenokārt, nospiediet taustiņu kombināciju “Alt+F11”, lai aktivizētu VBA redaktoru programmā Word.
2. Pēc tam noklikšķiniet uz “Normal”.
3. Pēc tam noklikšķiniet uz "Ievietot" un nolaižamajā izvēlnē atlasiet "Modulis".
4. Atveriet jauno moduli, veicot dubultklikšķi.
5. Tagad kodēšanas apgabalā ielīmējiet šādus kodus:

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. Izvēlņu joslā noklikšķiniet uz pogas “Palaist” vai nospiediet “F5”, lai izpildītu kodus.

Kad sāksiet palaist makro, parādīsies uznirstošais ziņojuma lodziņš, piemēram, šāds:

Uz lodziņa tiek rādīts pašreiz atlasītā tekstlodziņa saturs. Varat noklikšķināt uz “Jā”, lai to apturētu, ja tas ir jūsu vēlamais tekstlodziņš. Pretējā gadījumā noklikšķiniet uz "Nē", lai pārietu uz nākamo tekstlodziņu.

3. metode: atrodiet konkrētu tekstlodziņu

Ja iestatāt virsrakstu tekstlodziņam dokumentā, varat to izmantot kopā ar nosaucošo makro, lai to nekavējoties atrastu.

1. Vispirms skatiet 2. metodes darbības, lai instalētu un palaistu makro.
2. Pēc tam atcerieties aizstāt makro ar šo:

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. Pēc tam atvērtajā ievades lodziņā ievadiet meklējamā teksta lodziņa nosaukumu un noklikšķiniet uz “Labi”, lai turpinātu. Mērķa teksta lodziņš būs atlasīts.

Tikt galā ar datu zudumu

Ņemot vērā to, ka Word ir viena no visbiežāk izmantotajām programmatūrām, ir jāzina daži triki, ko darīt, ja Word pārstāj reaģēt. Svarīgiem gadījumiem korumpēts dok, jūsu vienīgā izvēle ir to atgūt. Un, lai to izdarītu, jums rūpīgi jāizvēlas trešās puses rīks, kuram varat uzticēties.

Autora ievads:

Vera Čena ir datu atkopšanas eksperte DataNumen, Inc., kas ir pasaules līderis datu atkopšanas tehnoloģiju, tostarp korumpēts xlsx un pdf programmatūras produktu labošana. Lai iegūtu vairāk informācijas, apmeklējiet vietni www.datanumen. Ar