Zum Hauptinhalt springen

Kutools für Office — Eine Suite. Fünf Tools. Erledigen Sie mehr.

Wie ändert man gerade Anführungszeichen in geschwungene Anführungszeichen in Word?

Author Amanda Li Last modified

Normalerweise wird Microsoft Word gerade Anführungszeichen automatisch Straight quotes in geschwungene (intelligente oder typografische) Anführungszeichen ändern, Curly quotes während Sie tippen. Wenn diese Funktion jedoch deaktiviert ist, können sowohl einfache als auch doppelte Anführungszeichen in Ihrem Dokument gerade erscheinen. Hier sind einige Tipps, wie Sie gerade Anführungszeichen in geschwungene und umgekehrt in Word ändern können.

Gerade Anführungszeichen mit Suchen und Ersetzen in geschwungene ändern

Gerade Anführungszeichen mit VBA in geschwungene ändern

Straight quotes Arrow Curly quotes

Empfohlene Produktivitätstools für Word

Kutools für Word: Integration von KI 🤖, über 100 erweiterte Funktionen sparen 50 % Ihrer Dokumentbearbeitungszeit. Kostenloser Download

Office Tab: Einführung von browserähnlichen Tabs in Word (und andere Office-Tools), die die Navigation zwischen mehreren Dokumenten vereinfachen. Kostenloser Download


Gerade Anführungszeichen mit Suchen und Ersetzen in geschwungene ändern

Bevor Sie die Funktion „ Suchen und Ersetzen“ anwenden, sollten Sie zu den AutoKorrektur-Optionen gehen und das Kontrollkästchen „Gerade Anführungszeichen durch geschwungene ersetzen“ deaktivieren.

Schritt 1. Klicken Sie auf Datei > Optionen > Rechtschreibung > AutoKorrektur-Optionen > AutoFormat während der Eingabe und aktivieren Sie das Kontrollkästchen „Gerade Anführungszeichen durch geschwungene ersetzen“. Siehe 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

Schritt 2. Klicken Sie auf Start > Ersetzen in der Gruppe Bearbeiten oder drücken Sie Strg + H, um das Dialogfeld „Suchen und Ersetzen“ zu öffnen, und geben Sie oder ‘’ im Feld „Suchen nach“ ein und oder ’’ im Feld „Ersetzen mit“. Siehe Screenshot:

Find and Replace dialog

Schritt 3. Klicken Sie auf „Alle ersetzen“.

Hinweis: Wenn Sie alle geschwungenen Anführungszeichen durch gerade ersetzen möchten, deaktivieren Sie bitte das Kontrollkästchen „Gerade Anführungszeichen durch geschwungene ersetzen“.


Gerade Anführungszeichen mit VBA in geschwungene ändern

Office Tab: Führt tabbed Interfaces in Word, Excel, PowerPoint... ein
Navigate through documents using Office Tab
Verbessern Sie jetzt Ihren Arbeitsablauf.Mehr über Office Tab erfahren Kostenlos herunterladen

Um alle geraden Anführungszeichen in Word 2010 mit VBA durch geschwungene zu ersetzen, klicken Sie bitte auf Datei > Optionen > Rechtschreibung und dann auf AutoKorrektur-Optionen und aktivieren Sie das Kontrollkästchen „Gerade Anführungszeichen durch geschwungene ersetzen“, wie folgt. (Hinweis: Wenn Sie alle geschwungenen Anführungszeichen durch gerade ersetzen möchten, deaktivieren Sie bitte das Kontrollkästchen „Gerade Anführungszeichen durch geschwungene ersetzen“).

Schritt 1: Drücken Sie „Alt-F11“, um das Fenster Microsoft Visual Basic for Applications zu öffnen;

Schritt 2: Klicken Sie auf Modul auf der Registerkarte Einfügen, kopieren Sie den folgenden VBA-Code und fügen Sie ihn in das Modulfenster ein;

Schritt 3: Klicken Sie dann auf Ausführen Run button , um die VBA anzuwenden.

Der folgende VBA-Code ändert gerade Anführungszeichen in geschwungene:

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

Der folgende VBA-Code ändert geschwungene Anführungszeichen in gerade:

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

Die besten Produktivitätstools für das Büro

Kutools for Word – Erweitern Sie Ihr Word-Erlebnis mit mehr als 100 bemerkenswerten Funktionen!

🤖 Kutools AI Features: KI-Assistent / Echtzeit-Assistent / Super Polieren (Format beibehalten) / Super Übersetzen (Format beibehalten) / KI-Redaktion / KI Korrekturlesen ...

📘 Dokument beherrschen: Seiten aufteilen / Dokumente zusammenführen / Bereich in verschiedenen Formaten exportieren (PDF/TXT/DOC/HTML ...) / Stapelweise Konvertierung zu PDF ...

Text bearbeiten: Stapelweise Suchen und Ersetzen in mehreren Dateien / Alle Bilder skalieren / Tabelle transponieren (Zeilen und Spalten) / Tabelle in Text umwandeln ...

🧹 Mühelos reinigen: Zusätzliche Leerzeichen entfernen / Abschnittsumbrüche / Textfeld / Verknüpfungen / Weitere Entfernen-Werkzeuge finden Sie in der Gruppe Entfernen ...

Kreative Einfügen: Tausendertrennzeichen einfügen / Kontrollkästchen / Optionsfeld / QR-Code / Barcode / Mehrere Bilder / Entdecken Sie weitere Funktionen in der Gruppe Einfügen ...

🔍 Präzise Auswahl: Einzelne Seiten, Referenztabellen, Form, Überschriftenabsatz gezielt festlegen / Navigation mit weiteren Auswählen -Features verbessern ...

Besondere Erweiterungen: Zu jedem Bereich navigieren / Automatisches Einfügen von wiederkehrendem Text / Zwischen Dokument-Fenster umschalten /11 Konvertierungs-Werkzeuge ...

🌍 Unterstützt über40 Sprachen: Nutzen Sie Kutools in Ihrer bevorzugten Sprache – Englisch, Spanisch, Deutsch, Französisch, Chinesisch und über40 weitere!

Kutools and Kutools Plus tabs on the Word Ribbon
👉 Möchten Sie diese Funktionen ausprobieren? Jetzt Kutools for Word herunterladen! 🚀
 

✨ Kutools for Office – Eine Installation, fünf leistungsstarke Tools!

Enthält Office Tab Pro · Kutools für Excel · Kutools für Outlook · Kutools for Word · Kutools for PowerPoint

📦 Alle5 Tools in einer Suite erhalten | 🔗 Nahtlose Integration in Microsoft Office | ⚡ Sofort Zeit sparen und Produktivität steigern

Die besten Produktivitätstools für das Büro

Kutools for Word – 100+ Tools für Word