Kuinka muuttaa suorat lainaukset kiharaiksi lainauksiksi Wordissa?
Normaalisti Microsoft Word muuttaa automaattisesti suoria lainausmerkkejä kiharaisiin (älykkään ortypografin) lainauksiin
kun kirjoitat. Mutta jos ominaisuus on poistettu käytöstä, sekä lainausmerkit että lainausmerkit voivat näkyä suoraan asiakirjassa. Tässä on vinkkejä, joiden avulla voit muuttaa suorat lainaukset kiharaiksi lainauksiksi ja päinvastoin Wordissa.
Muuta suorat lainaukset kiharaiksi lainauksiksi Etsi ja korvaa -toiminnolla
Muuta suorat lainaukset kiharaiksi lainauksiksi VBA:lla
![]() | ![]() | ![]() |
Wordin suositellut tuottavuustyökalut
Kutools for Word: Integroiva tekoäly 🤖, yli 100 lisäominaisuutta säästää 50 % asiakirjojen käsittelyajasta.Ilmainen lataus
Office-välilehti: Esittelee Wordin (ja muiden Office-työkalujen) selaimen kaltaiset välilehdet, mikä yksinkertaistaa useiden asiakirjojen navigointia.Ilmainen lataus
Muuta suorat lainaukset kiharaiksi lainausmerkeiksi Etsi ja korvaa -toiminnolla
Ennen levittämistä Etsi ja korvaa, sinun pitäisi mennä Automaattisen korjauksen asetukset poistaaksesi valinnan "Suorat lainaukset" ja "älykkäät lainaukset" Valintaruutu.
Vaihe 1. Klikkaus filee > Vaihtoehto > Proofing > Automaattisen korjauksen asetukset > Automaattinen muotoilu kirjoittaessasi, ja valitse "Suorat lainaukset" ja "älykkäät lainaukset" valintaruutu. Katso kuvakaappaus
![]() | ![]() | ![]() |
![]() |
![]() |
Vaihe 2. Klikkaus ETUSIVU > korvata vuonna Muokkaaminen ryhmä tai paina Ctrl + H näyttää Etsi ja korvaa valintaikkuna ja kirjoita " or '' in Etsittävä ruutuun ja kirjoita " or '' in Korvaa laatikko. Katso kuvakaappaus:
Vaihe 3. Klikkaus Korvaa kaikki.
Huomautus: Jos haluat korvata kaikki kiharat lainaukset suorilla lainausmerkeillä, tyhjennä "Suorat lainaukset" ja "älykkäät lainaukset" valintaruutu).
Muuta suorat lainaukset kiharaiksi lainauksiksi VBA:lla
Office-välilehti: Tuo välilehtiliittymät Wordiin, Exceliin, PowerPointiin...![]() |
Paranna työnkulkuasi nyt. Lisätietoja Office-välilehdestä Ilmainen lataus |
Jos haluat korvata kaikki suorat lainaukset kiharailla lainausmerkeillä Word 2010:ssä VBA:ta käyttämällä, napsauta filee> Vaihtoehto > Proofing ja valitse Automaattisen korjauksen Vaihtoehdot Ja valitse "Suorat lainaukset" ja "älykkäät lainaukset" valintaruutu ensin seuraavasti. (Huomautuksia: jos haluat korvata kaikki kiharat lainausmerkit suorilla lainausmerkeillä, poista "Suora lainaus" -valintaruutu "älykkäät lainausmerkit" -valintaruudusta).
Vaihe 1: Paina "Alt-F11” avataksesi Microsoft Visual Basic for Application -ikkunan;
Vaihe 2: Napsauta Moduulit på den liite -välilehti, kopioi ja liitä seuraava VBA-koodi tiedostoon Moduulit ikkuna;
Vaihe 3: Napsauta sitten ajaa -painiketta ottaaksesi VBA käyttöön.
Seuraava VBA muuttaa suorat lainaukset kiharaiksi lainauksiksi:
Sub ChangeDoubleStraightQuotes()
'Update 20131107
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = """"
.Replacement.Text = """"
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord =False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub
Seuraava VBA muuttaa kiharat lainaukset suoriksi lainauksiksi:
Sub ReplaceSmartQuotes()
Dim vFindText As Variant
Dim vReplText As Variant
Dim i As Long
vFindText = Array("[^0145^0146]", "[^0147^0148]")
vReplText = Array("^039", "^034")
With Selection.Find
.ClearFormatting
.Replacement.ClearFormatting
.Forward = True
.Wrap = wdFindContinue
.MatchWholeWord = True
.MatchWildcards = True
For i = LBound(vFindText) To UBound(vFindText)
.Text = vFindText(i)
.Replacement.Text = vReplText(i)
.Execute Replace:=wdReplaceAll
Next i
End With
End Sub
Parhaat toimiston tuottavuustyökalut
Kutools for Word - Paranna sanakokemustasi Overilla 100 Merkittäviä ominaisuuksia!
🤖 Kutools AI -ominaisuudet: AI-avustaja / Reaaliaikainen avustaja / Super Polish (säilytettävä muoto) / Super Translate (säilytä muoto) / AI editointi / AI Proofread...
📘 Asiakirjan hallinta: Jaa sivut / Yhdistä asiakirjat / Vie valikoima eri muodoissa (PDF/TXT/DOC/HTML...) / Erämuunnos PDF-muotoon...
✏ Sisältö Editointi: Eräetsi ja korvaa useita tiedostoja / Muuta kaikkien kuvien kokoa / Transponoi taulukon rivit ja sarakkeet / Muunna taulukko tekstiksi...
🧹 Vaivaton puhdistus: Pyyhkäise pois Ylimääräiset tilat / Leikkaukset / Tekstilaatikot / Hyperlinkit / Jos haluat lisää irrotustyökaluja, siirry kohtaan poista ryhmä...
➕ Luovat lisäosat: Aseta Tuhat erottimet / Valintaruudut / Radiopainikkeet / QR koodi / Viivakoodi / Useita kuvia / Tutustu lisää osoitteessa liite ryhmä...
🔍 Tarkkuusvalinnat: Tarkka kohta Tietyt sivut / taulukot / Muodot / Otsikko Kappaleet / Paranna navigointia lisää valita piirteet...
⭐ Tähtien parannukset: Siirry mihin tahansa sijaintiin / Lisää toistuvaa tekstiä automaattisesti / Vaihda asiakirjaikkunoiden välillä / 11 Muuntaminen Työkalut...

Parhaat toimiston tuottavuustyökalut
Kutools for Word - Yli 100 Wordin työkalua
- 🤖 Kutools AI -ominaisuudet: AI-avustaja / Reaaliaikainen avustaja / Super puolalainen / Super käännös / AI editointi / AI Proofread
- 📘 Asiakirjan hallinta: Jaa sivut / Yhdistä asiakirjat / Erämuunnos PDF-muotoon
- ✏ Sisältö Editointi: Erä Etsi ja korvaa / Muuta kaikkien kuvien kokoa
- 🧹 Vaivaton puhdistus: Poista ylimääräiset välilyönnit / Poista osion katkokset
- ➕ Luovat lisäosat: Aseta Tuhat erottimet / Lisää valintaruudut / Luo QR-koodeja