Czy da się w wordzie automatycznie przenieść pojedyncze litery z końca wiersza do następnego wiersza

Tekst bez pojedynczych liter na końcu wiersza wygląda schludniej. Czy można dla całego tekstu domyślnie ustawić lub zrobić to post factum by takie samotne literki automatycznie były przenoszone do następnego wiersza ?

Ja pisząc tekst odruchowo daję twardą spację przed spójnikiem (ctrl+shift+spacja). Pewnie najszybciej w gotowym tekście będzie wyszukać spójniki i w opcji “zamień na” dać tą literę a za nią twardą spację :wink: Na 100% są jakieś makra do tego.

Kiedyś korzystałem z takiego makra znalezionego na 4programmers:

MaxLines = ActiveDocument.BuiltInDocumentProperties(wdPropertyLines)
For i = 1 To MaxLines
Selection.GoTo What:=wdGoToLine, Which:=wdGoToFirst, Count:=i, Name:=""
Selection.EndKey Unit:=wdLine, Extend:=wdExtend
With Selection.Characters
If .Count > 4 Then
If (.Item(.Count - 2) = Chr(32)) And (.Item(.Count - 1) <> Chr(32)) And (.Item(.Count) = Chr(32)) Then
.Item(.Count) = Chr(160)
End If
End If
End With
Next

Link do oryginału: [Word / VBA?]

Wstawianie twardej spacji przed każdym pojedynczą literą, to zły pomysł. Lepiej robić to ręcznie, tylko tam gdzie jest taka potrzeba.
Twarda spacja się nie justuje. Niby w nowszych wordach miało być to naprawione, ale w 2016 cały czas nie działa.

Żeby zrobić porządnie, to trzeba trochę trików.
3 strona, ostatni post Jakub Stachu
https://answers.microsoft.com/en-us/msoffice/forum/msoffice_word-mso_windows8-mso_2016/nonbreakable-space-justification-in-word-2016/4fa1ad30-004c-454f-9775-a3beaa91c88b