Schreibbüro Richter

In Word ein einzelnes Wort von der automatischen Silbentrennung ausnehmen

Silbentrennung in Word trennt einzelne Buchstaben

Die automatische Silbentrennung in Word trennt seit Einführung der neuen (reformierten) Rechtschreibung häufig einzelne Buchstaben ab, z. B.: Ü-bermittlung, e-ben, o-der usw. Das Dialogmenü Silbentrennung bietet auch keine Möglichkeit, solche Trennungen zu verhindern. Man könnte natürlich im Menü Start Bereich Absatz Dialog box launcher (kleiner Pfeil ↘ im Kästchen) – Register Zeilen- und Seitenumbruch die Option Keine Silbentrennung verwenden. Leider wirkt sich diese eben auf den ganzen Absatz aus.

Silbentrennung für ein einzelnes Wort über die Menüleiste deaktivieren

Da die Silbentrennung durch die Einstellung der Sprache festgelegt wird, lässt sich ein einzelnes Wort oder gar nur ein Teil eines Wortes (in unserem Beispiel: o-der) davon ausnehmen:

Aktuelle Word-Versionen ab Word 2007 und neuer

Das Wort (oder der Wortteil) wird markiert. In der Menüleiste Überprüfen Bereich Sprache auf den kleinen Abwärtspfeil auf dem Button Sprache klicken, die Option Sprache für die Korrekturhilfen festlegen... auswählen.

Optionen für die Silbentrennung über die Menüleiste aufrufen

Im neuen Dialogfenster die Option Rechtschreibung und Grammatik nicht prüfen aktivieren (den Haken setzen), dann auf den Button OK.

Im Dialog Sprache die Silbentrennungsoptionen festlegen

Word 2000 bis Word 2003

Word 2000 bis Word 2003: Im Menü ExtrasSpracheSprache festlegen wird die Option Rechtschreibung und Grammatik nicht prüfenausgewählt.

Word 97

ExtrasSpracheSprache bestimmen die Option (Keine Überprüfung).

Perfektes Ergebnis: »o-der« wird nicht mehr getrennt. Hat man nur eine Silbe (z. B.: »Über«) ausgewählt, kann trotzdem automatisch getrennt werden, und zwar sinnvoll: »Über-mittlung«.

VBA-Makro um einzelne Wörter von der Silbentrennung auszuschließen

Es liegt nahe, das Hangeln durch die Menüs in eine kleine VBA-Prozedur aufzunehmen, die man mit einem → Shortcut schneller verwenden kann:


Sub WortAusSilbentrennungAusschliessen()  
' © Schreibbüro Richter  
    Dim bMarkierung As Boolean
    If Documents.Count < 1 Then Exit Sub
    bMarkierung = False
    If Not Selection.Type = wdSelectionNormal Then
        bMarkierung = True
        Selection.Expand wdWord
    End If

    #If VBA6 = False Then
    'bedingt kompiliert für Word 97 (mit VBA 5)
        Selection.LanguageID = wdNoProofing
    #Else
        Selection.NoProofing = True
    #End If

    If bMarkierung Then
        Selection.Collapse wdCollapseEnd
    End If

End Sub  
			

Die bedingt kompilierte If-Schleife sicherte zur Entstehungszeit, dass die Prozedur auch in Word 97 läuft (und vor allem keinen Fehler produziert), sie kann weggelassen werden. Sie zeigt am Beispiel, wie man mit einer Compiler-Konstante bedingt kompiliert und auf von Microsoft geänderte Konstanten in verschiedenen Word-Versionen reagieren kann.