2 mënyra të shpejta për të gjetur disa artikuj në një dokument me një fjalë në të njëjtën kohë

Në këtë postim, fokusi ynë është në shfaqjen e 2 mënyrave të shpejta për të gjetur artikuj të shumtë në një dokument Word në të njëjtën kohë.

Kushdo që është i njohur me Word duhet të dijë mjaft mirë opsionin "Gjeni dhe zëvendësoni". Funksionon mirë kur teksti i gjetjes është një varg i njëpasnjëshëm. Por, për fat të keq, bëhet e ndërlikuar kur duam të kërkojmë për shumë fjalë të veçanta në të njëjtën kohë. Dhe atje, kërkesa është e fortë për të nxjerrë një listë fjalësh ose frazash në një dokument me një lëvizje. Për shembull, nëse jeni redaktues, mund të ketë disa fjalë që nuk duhet të shfaqen kurrë në asnjë dokument. Nëse po, do t'ju duhen zgjidhje për të shënuar shfaqjen e disa fjalëve specifike.

Këtu janë 2 zgjidhje të disponueshme:

Metoda 1: Importoni fjalë në fjalorin e përjashtuar

Shtoni një grup fjalësh ose frazash në fjalorin përjashtues në Word, dhe më pas do të shfaqet një vijë e kuqe me valë nën fjalët e përputhura për t'i nxjerrë ato me flamur.

Hapat e detajuar për të shtuar fjalë në fjalorin përjashtues janë në këtë artikull: 4 Këshilla të dobishme për kontrollin e drejtshkrimit dhe gramatikës së fjalëve

Metoda 2: Përdorni Word Macro

  1. Para së gjithash, vendosni të gjitha fjalët që dëshironi të kërkoni në një dokument. Çdo fjalë ose frazë duhet të zërë një paragraf. Këtu le ta quajmë "dokument liste". Ruajeni dokumentin.Një listë fjalësh për t'u gjetur
  2. Së dyti, klikoni në skedën "Zhvilluesi".
  3. Pastaj klikoni "Visual Basic" për të hapur redaktorin VBA. Mënyra alternative është të shtypni "Alt+ F11".Klikoni "Zhvilluesi" -> Klikoni "Visual Basic"
  4. Pastaj klikoni "Normale" dhe më pas skedën "Fut".
  5. Dhe zgjidhni "Modul" në meny.Kliko "Normal" -> Kliko "Fut" -> Kliko "Modul"
  6. Klikoni dy herë në modulin e ri për të nxjerrë zonën e redaktimit dhe ngjitni makronë e mëposhtme atje:
Sub FindMultiItemsInDoc()
  Dim objListDoc As Document
  Dim objTargetDoc As Document
  Dim objParaRange As Range, objFoundRange As Range
  Dim objParagraph As Paragraph
  Dim strFileName As String

  strFileName = InputBox("Enter the full name of the list document here:")
 
  Set objTargetDoc = ActiveDocument
  Set objListDoc = Documents.Open(strFileName)
  objTargetDoc.Activate
 
  For Each objParagraph In objListDoc.Paragraphs
    Set objParaRange = objParagraph.Range
    objParaRange.End = objParaRange.End - 1
 
      With Selection
        .HomeKey Unit:=wdStory
 
        '  Find target items.
        With Selection.Find
          .ClearFormatting
          .Text = objParaRange
          .MatchWholeWord = True
          .MatchCase = False
          .Execute
        End With
 
        '  Highlight the found items.
        Do While .Find.Found
          Set objFoundRange = Selection.Range
          objFoundRange.HighlightColorIndex = wdBrightGreen
          .Collapse wdCollapseEnd
          .Find.Execute
        Loop
      End With
  Next objParagraph
End Sub
  1. Së fundi, klikoni "Run".Ngjit kodet -> Kliko "Run"
  2. Tani ka një kuti. Futni shtegun dhe emrin e dokumentit të listës që sapo keni ruajtur. Pastaj klikoni "OK".Futni shtegun e dokumentit të listës

Gjëja tjetër që shihni është se të gjitha fjalët e gjetura janë në theksim.Theksoni fjalët e gjetura

Siguroni dokumentet tuaja të Word-it

Një nga masat më të njohura për të parandaluar dëmtimin e dokumenteve tuaja në Word është të bëni kopje rezervë. Ato mund t'ju japin qetësi shpirtërore kur keni një docx e dëmtuar. Pra, merrni kohën tuaj për të kopjuar skedarët tuaj të rëndësishëm tani.

Hyrje e autorit:

Vera Chen është një eksperte për rikuperimin e të dhënave DataNumen, Inc., e cila është lider botëror në teknologjitë e rikuperimit të të dhënave, duke përfshirë i korruptuar xlsx pdf riparimin e produkteve softuerike. Për më shumë informacion vizitoni www.datanumen.com

Komentet janë të mbyllura.