Tässä artikkelissa haluamme jakaa kanssasi kaksi nopeaa tapaa etsiä kaikkia alleviivattuja tekstejä Word-asiakirjassasi.
Runsas alleviivausten esiintyminen Word-asiakirjassa ei ole epätavallista. Siksi niin monia alleviivausten käyttöön liittyviä vaatimuksia tulee jatkuvasti vastaan. Katsotaanpa nyt tällaisia pyyntöjä.
- Etsi alleviivattuja välilyöntejä. Saatat tuntea olosi hukassa ensi ajatuksella. Mutta voit ajatella tällä tavalla, että kun täytät tenttiä Word-asiakirjassa, sinun on etsittävä tiedostoa nähdäksesi, onko jokin kysymys jäänyt vastaamatta.
- Muuta tapaa lyödä tekstit läpi. Voit saada tekstit erottumaan alleviivaamalla ne. On kuitenkin olemassa myös muita keinoja, kuten kursiivisella kirjasintyylillä varustettujen tekstien käyttäminen.
- Muuta alleviivauksen väriä. Voit muokata alleviivauksen väriä tehdäksesi siitä huomiota herättävämmän.
Yllä olevien vaatimusten täyttämiseksi on yksi yhteinen vaihe, joka on ensin etsiä alleviivauksia. Ja tässä on 2 tapaamme:
Tapa 1: Käytä Advanced Find -vaihtoehtoa
- Aloita napsauttamalla "Etusivu"-välilehteä.
- Napsauta sitten ylösalaisin olevaa kolmiopainiketta Etsi-kohdan takana.
- Valitse seuraavaksi "Lisähaku".

- Napsauta "Etsi ja korvaa" -valintaikkunassa "Muotoile" -painiketta.
- Valitse sitten "Fontti".
- Valitse "Etsi fontti" -ruudussa asiakirjassa käytetty alleviivaustyyli ja napsauta "OK".
- Valitse nyt joko "Etsi" ja sitten "Pääasiakirja" tai jatka "Etsi seuraava" -painiketta. Edellinen valitsee kaikki asiakirjan alleviivaukset, kun taas jälkimmäinen vie sinut läpi alleviivauksen yksitellen.
Muuten, jos haluat ohittaa vaiheet 4–6, voit käyttää pikanäppäimiä. "Ctrl+U" viittaa yhteen alleviivaukseen ja "Ctrl + Vaihto + D”, kaksoisalleviivaus.
Tapa 2: Suorita Word-makro
- Napsauta ensin "Kehittäjä"-välilehteä ja sitten "Visual Basic" saadaksesi VBA-editorin. Vaihtoehtoinen tapa on painaa "Alt + F11".
- Napsauta seuraavaksi “Normaali”.
- Napsauta sitten Lisää-välilehteä ja valitse Moduuli.
- Nyt olet onnistuneesti lisännyt uuden moduulin "Normaali"-projektiin. Avaa muokkausalue kaksoisnapsauttamalla uutta moduulia.
- Liitä seuraavaksi seuraavat koodit sinne:
Sub FindUnderlineInDoc()
Dim objDoc As Document
Dim objRange As Range
Set objDoc = ActiveDocument
Set objRange = objDoc.Range
objRange.Find.ClearFormatting
objRange.Find.Font.Underline = wdUnderlineSingle
With Selection.Find
.text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = True
.Execute
End With
End Sub
- Lopuksi paina "Suorita" -painiketta.
Huomautuksia:
Koodirivi "objRange.Find.Font.Underline = wdUnderlineSingle" tarkoittaa, että tämä makro löytää yhden alleviivauksen. Joten jos haluat löytää alleviivauksen muilla tyyleillä, sinun on korvattava "wdUnderlineSingle” muiden vakioiden kanssa, joista löydät lisää täältä: https://docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa224269(v=office.11)
Selviytyä Word-virheistä
Oletko koskaan törmännyt raporttiasi laatiessasi a korruptoitunut Word, menetätkö tiedoston, jonka parissa juuri työskentelet? Tällainen skenaario on vähiten odotamme. Siitä huolimatta sitä tapahtuu ja se voi olla tuhoisa isku uralle. Siksi säästääksesi sekä aikaasi että uraasi tarvitset myös ammattilaisen korjaamaan Word-ohjelmasi.
Tekijän esittely:
Vera Chen on tietojen palauttamisen asiantuntija DataNumen, Inc., joka on maailman johtava tietojen palautustekniikoissa, mukaan lukien xls korjata ja pdf korjata ohjelmistotuotteita. Lisätietoja osoitteessa www.datanumen.com





