2 gyors módszer az azonos színű szövegek kivonására a Word-dokumentumból

A mai bejegyzésben örömmel osztunk meg veletek két gyors módszert, amelyekkel azonos színű szövegeket kinyerhettek a Word-dokumentumotokból.

Időnként egy Word-dokumentum formázása közben valószínűleg betűszínt alkalmazunk egyes szövegeknél, hogy kiemeljük őket, hogy fokozott figyelmet kapjunk. Általában ezek a színes szavak olyan fontos tartalmak, amelyek újra megérdemlik az értékelést. Akkor mit szólnál ahhoz, hogy exportáld és máshova gyűjtsd őket, hogy később egyértelműen ellenőrizhessük?

Erre az igényre összpontosítva két gyors parancsikont javasolunk a végtelen vágási és beillesztési műveletek helyett.

1. módszer: Használja a „Keresés” funkciót

1. Először kattintson a „Kezdőlap” fülre.
2. Ezután lépjen a „Szerkesztés” csoportba, és kattintson a „Keresés” melletti fejjel lefelé mutató háromszög gombra.
3. Ezután válassza a „Speciális keresés” lehetőséget a listában.
4. A „Keresés és csere” párbeszédpanelen vigye a kurzort a „Keressen mit” szövegmezőbe, és törölje a tartalmat, ha van.
5. Ezután kattintson a „Tovább” gombra.
6. Most kattintson a „Formátum” gombra, és válassza a „Betűtípus” lehetőséget.
7. A „Betűtípus keresése” párbeszédpanelen kattintson a „Betűtípus színe” alatti legördülő menü gombra, hogy kiválassza a szövegekhez rendelhető pontos színt.
8. Ne felejtsen el kattintani az „OK” gombra.
9. Most térjen vissza a „Keresés és csere” mezőbe, és kattintson a „Keresés” gombra.
10. Végül válassza a „Fő dokumentum” lehetőséget.

Ezután a célszínben lévő összes szöveg kijelölődik. A „Ctrl+C” billentyűkombinációval másolhatja és beillesztheti őket egy másik helyre.

2. módszer: Futtasson Word makrót

1. Először is, kattintson a „Fejlesztő” fülre.
2. Ezután kattintson a „Visual Basic” elemre a VBA-szerkesztő elindításához.
3. Ezután kattintson a „Normál”, majd a „Beszúrás” gombra.
4. Válassza a „Modul” lehetőséget a menüben.
5. Ezután kattintson duplán a modulra a kódolótér aktiválásához.
6. Következő beillesztési kódok:

Sub ExtractColoredTexts()
  Dim objDoc As Document, objDocAdd As Document
  Dim objRange As Range

  Set objDoc = ActiveDocument
  Set objDocAdd = Documents.Add
  objDoc.Activate

  With Selection
    .HomeKey Unit:=wdStory
    With Selection.Find
      .ClearFormatting
      .Replacement.ClearFormatting
      .Font.Color = wdColorRed
      .Text = ""
      .Execute
    End With
  Do While .Find.Found
    Set objRange = Selection.Range
    objDocAdd.Range.InsertAfter objRange & vbCr
    .Collapse wdCollapseEnd
    .Find.Execute
  Loop
  End With
End Sub

7. Most kattintson a „Futtatás” gombra.

Meg kell nyitni egy új dokumentumot az összes kivonatolt szöveggel.

Megjegyzés: A „.Font.Color = wdColorRed” kódsorban a „wdColorRed” kifejezést a szövegek tényleges színére kell cserélnie. Részletes tájékoztatásért látogassa meg ezt az oldalt: https://docs.microsoft.com/en-us/office/vba/api/Word.WdColor

Szóprobléma címe

Legtöbben már rendszeresen használjuk a Wordöt. Ennek ellenére továbbra is találkozhatunk komoly problémákkal, például a Word összeomlásával. Ez mindenképpen egy meglehetősen komoly probléma, mivel kritikus fájljaink veszélyben lehetnek. Ilyen körülmények között ajánlott egy... Word adathiba-javító eszköz amely néhány perc alatt helyreállítja a Word adatokat.

Szerző Bevezetés:

Vera Chen adat-helyreállítási szakértő DataNumen, Inc., amely világelső az adat-helyreállítási technológiák területén, beleértve xls adatprobléma-javító eszköz és a pdf javító szoftvertermékek. További információért látogasson el www.datanumen.com