Skip to main content

Hoe rechte aanhalingstekens in Word omzetten naar gekrulde aanhalingstekens?

Author: Amanda Li Last Modified: 2025-05-29

Normaal gesproken zal Microsoft Word automatisch rechte aanhalingstekens Straight quotes omzetten in gekrulde (slimme of typografische) aanhalingstekens Curly quotes terwijl je typt. Maar als deze functie is uitgeschakeld, kunnen zowel enkele als dubbele aanhalingstekens recht verschijnen in je document. Hier zijn tips om rechte aanhalingstekens om te zetten in gekrulde aanhalingstekens en vice versa in Word.

Rechte aanhalingstekens omzetten in gekrulde met Zoeken en Vervangen

Rechte aanhalingstekens omzetten in gekrulde met VBA

Straight quotes Arrow Curly quotes

Aanbevolen productiviteitstools voor Word

Kutools voor Word: Integratie van AI 🤖, meer dan 100 geavanceerde functies besparen 50% van uw documentverwerkings tijd.Download nu gratis

Office Tab: Voegt browser-achtige tabbladen toe aan Word (en andere Office tools), waardoor het navigeren tussen meerdere documenten eenvoudiger wordt.Download nu gratis


Rechte aanhalingstekens omzetten in gekrulde met Zoeken en Vervangen

Voordat je Zoeken en Vervangen gebruikt, moet je naar de AutoCorrectie-opties gaan om het selectievakje "Rechte aanhalingstekens" met "slimme aanhalingstekens" uit te vinken.

Stap 1. Klik op Bestand > Opties > Proofing > AutoCorrectie-opties > AutoOpmaak tijdens het typen, en vink het selectievakje "Rechte aanhalingstekens" met "slimme aanhalingstekens" aan. Zie screenshot.

File menu with Options selected Arrow Word Options window with Proofing tab opened, AutoCorrect Options clicked
Arrow
AutoFormat As You Type section with 'Straight quotes' with 'smart quotes' checkbox selected

Stap 2. Klik op Start > Vervangen in de Bewerken groep of druk op Ctrl + H om het dialoogvenster Zoeken en Vervangen weer te geven, en voer of ‘’ in het vak Zoeken naar in, en voer of ’’ in het vak Vervangen door in. Zie screenshot:

Find and Replace dialog

Stap 3. Klik op Alles vervangen.

Opmerking: als je alle gekrulde aanhalingstekens wilt vervangen door rechte aanhalingstekens, wis dan het selectievakje "Rechte aanhalingstekens" met "slimme aanhalingstekens".


Rechte aanhalingstekens omzetten in gekrulde met VBA

Office Tab: Voegt tabbladinterfaces toe aan Word, Excel, PowerPoint...
Navigate through documents using Office Tab

Om alle rechte aanhalingstekens in Word 2010 te vervangen door gekrulde aanhalingstekens met behulp van VBA, klik dan op Bestand> Opties > Proofing en klik op AutoCorrectie-opties en selecteer het selectievakje "Rechte aanhalingstekens" met "slimme aanhalingstekens" zoals hieronder weergegeven. (Opmerking: als je alle gekrulde aanhalingstekens wilt vervangen door rechte aanhalingstekens, wis dan het selectievakje "Rechte aanhalingstekens" met "slimme aanhalingstekens").

Stap 1: Druk op “Alt-F11” om het venster Microsoft Visual Basic for Applications te openen;

Stap 2: Klik op Module in het tabblad Invoegen, kopieer en plak de volgende VBA-code in het Module-venster;

Stap 3: Klik daarna op Uitvoeren Run button om de VBA toe te passen.

De volgende VBA-code zet rechte aanhalingstekens om in gekrulde aanhalingstekens:

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

De volgende VBA-code zet gekrulde aanhalingstekens om in rechte aanhalingstekens:

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

Beste productiviteitstools voor kantoor

Kutools voor Word – Til uw Word-ervaring naar een hoger niveau met meer dan 100 indrukwekkende functies!

🤖 Kutools AI-functies: AI Assistent / Realtime Assistent / Super Pools (Formaat behouden) / Super Vertalen (Formaat behouden) / AI Redactie / AI Proeflezen...

📘 Documentbeheersing: Pagina’s splitsen / Documenten samenvoegen / Selectie exporteren in diverse formaten (PDF/TXT/DOC/HTML...) / Batch converteren naar PDF...

Inhoud bewerken: Batch Zoeken en Vervangen in meerdere bestanden / Alle afbeeldingen formaat wijzigen / Rij- en kolomindeling van tabellen transponeren / Tabel naar tekst converteren...

🧹 Moeiteloos opschonen: Verwijder extra spaties / sectie-eindes / tekstvakken / hyperlinks / Voor meer verwijderopties, ga naar de groep Verwijderen...

Creatieve invoegingen: Voeg duizendtallen-scheidingstekens toe / selectievakjes / keuzerondjes / QR-code / barcode / meerdere afbeeldingen / Ontdek meer in de groep Invoegen...

🔍 Nauwkeurige selecties: Selecteer specifieke pagina’s / tabellen / vormen / kopalinea’s / Verbeter de navigatie met meer Selecteer -functies...

Ster-upgrades: Navigeer naar elke locatie / Automatisch herhalende tekst invoegen / Wissel tussen documentvensters /11 conversietools...

Kutools and Kutools Plus tabs on the Word Ribbon
👉 Wilt u deze functies uitproberen? Download Kutools voor Word nu! 🚀