Eines der häufigsten Probleme, mit denen Emily beim Bearbeiten konfrontiert ist, ist das Einfügen des seriellen Kommas in eine Inline-Liste von Elementen vor der endgültigen Verbindung zwischen Listenelementen. Emilys Büro erzwingt die Verwendung des seriellen Kommas, um Klarheit zu schaffen und möglicherweise unangenehme Formulierungen wie „Ich widme dieses Buch meinen Eltern, Mutter Teresa und Jesus“ zu vermeiden. Viele Autoren verwenden dieses Komma jedoch nicht gern, weshalb Emily viel Zeit damit verbringt, es in fast jedem Textabschnitt zu bearbeiten, auf den sie stößt. Emily merkt an, dass es ihr Leben leichter machen würde, wenn sie ein Makro hätte, das von der Einfügemarke bis zum Ende des aktuellen Satzes sucht und vor dem nächsten Auftreten der gemeinsamen Konjunktionen „und“ und „oder“ ein Komma einfügt, aber nur wenn es dort noch kein Komma gibt.

Was Emily meint, wird verschiedentlich als „serielles Komma“ oder „Oxford-Komma“ bezeichnet. Seine Verwendung wird seit Jahrzehnten von Grammatikern diskutiert. (Ich möchte hier nicht in eine Debatte darüber geraten, werde aber sagen, dass die Verwendung eines Oxford-Kommas die Klarheit bei Inline-Listen verbessern kann, wie Emily bemerkt.)

Emily sucht nach einer ziemlich einfachen Lösung für das Problem, bei der nach den üblichen Konjunktionen gesucht und bei Bedarf ein Komma eingefügt wird. Der beste Weg, um mit dieser Situation umzugehen, ist, wie sie bemerkt, ein Makro. Hier ist eine, die die Aufgabe ausführt:

Sub SerialComma()

Dim MySelection As Selection

Selection.MoveRight Unit:=wdSentence, Extend:=wdExtend     Set MySelection = Selection     Selection.Find.ClearFormatting     Selection.Find.Replacement.ClearFormatting     With Selection.Find         .Text = "([!,.?;:]) and "

.Replacement.Text = "\1, and "

.Forward = True         .Wrap = wdFindStop         .Format = False         .MatchCase = False         .MatchWildcards = True     End With     Selection.Find.Execute Replace:=wdReplaceAll     MySelection.Select     With Selection.Find         .Text = "([!,.?;:]) or "

.Replacement.Text = "\1, or "

End With     Selection.Find.Execute Replace:=wdReplaceAll     MySelection.Select     Selection.Collapse End Sub

Das Makro wählt zuerst alles von der aktuellen Einfügemarke bis zum Ende des aktuellen Satzes aus. Anschließend wird mithilfe einer Platzhaltersuche nach einem Vorkommen des Wortes „und“ gesucht, das keinem Satzzeichen folgt. Wenn es es findet, ersetzt es das Vorkommen durch ein Komma und das Wort „und“. Anschließend wird eine ähnliche Such- und Ersetzungsoperation für das Wort „oder“ ausgeführt.

Dieses Makro kann natürlich einer Tastenkombination oder dem Quick Access Toolbar zugewiesen werden, um das Hinzufügen dieser Art von Komma zum Kinderspiel zu machen.

Ich erkenne, dass dieses Makro möglicherweise nicht für alle grammatikalischen Permutationen funktioniert. (Englisch ist auf diese Weise eher „matschig“.) Es ist möglicherweise besser, Word Ihr Dokument einfach für Sie überprüfen zu lassen und alles zu markieren, was in Bezug auf das Vorhandensein des Oxford-Kommas (oder dessen Fehlen) in Frage gestellt wird. Sie können diese Änderung auf diese Weise vornehmen, wenn Sie Word 2007, Word 2010 oder Word 2013 verwenden:

  1. Zeigen Sie das Dialogfeld Word-Optionen an. (Klicken Sie in Word 2007 auf die Schaltfläche Office und dann auf Word-Optionen. Klicken Sie in Word 2010 oder Word 2013 auf die Registerkarte Datei des Menübands und dann auf Optionen.)

  2. Klicken Sie links im Dialogfeld auf die Option Proofing. (Siehe Abbildung 1.)

  3. Klicken Sie auf die Schaltfläche Einstellungen. Word zeigt das Dialogfeld Grammatikeinstellungen an. (Siehe Abbildung 2.)

  4. Stellen Sie sicher, dass die Option „Komma vor dem letzten Listenelement erforderlich“ auf „Immer“ gesetzt ist.

  5. Klicken Sie auf OK, um das Dialogfeld Grammatikeinstellungen zu schließen.

  6. Klicken Sie auf OK, um das Dialogfeld Word-Optionen zu schließen.

Wenn Sie Word 2016 oder eine neuere Version verwenden, führen Sie stattdessen die folgenden Schritte aus:

  1. Zeigen Sie die Registerkarte Datei des Menübands an und klicken Sie dann auf Optionen.

  2. Klicken Sie links im Dialogfeld auf die Option Proofing. (Siehe Abbildung 3.)

  3. Klicken Sie auf die Schaltfläche Einstellungen. Word zeigt das Dialogfeld Grammatikeinstellungen an.

  4. Scrollen Sie zum Ende des Dialogfelds, um die Option Interpunktionskonventionen anzuzeigen. Stellen Sie sicher, dass das Oxford-Komma ausgewählt ist. (Siehe Abbildung 4.)

  5. Klicken Sie auf OK, um das Dialogfeld Grammatikeinstellungen zu schließen.

  6. Klicken Sie auf OK, um das Dialogfeld Word-Optionen zu schließen.

Die Einstellung fügt nicht das letzte Komma für Sie ein, sondern erfasst die Fälle, in denen das Komma nicht vorhanden ist.

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der WordTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

WordTips ist Ihre Quelle für kostengünstige Microsoft Word-Schulungen.

(Microsoft Word ist die weltweit beliebteste Textverarbeitungssoftware.) Dieser Tipp (9295) gilt für Microsoft Word 2007, 2010, 2013, 2016, 2019 und Word in Office 365. Eine Version dieses Tipps finden Sie für ältere Menüoberfläche von Word hier: