Ci-dessus, une illustration de l’illustre Jules Césure.

Nous sommes d’accord, il est extrêmement consternant de voir Internet, et nos gazettes locales, envahis par des images générées par l’intelligence artificielle – de même que Thot, Dieu des Scribes et gardien de l’Autre Monde, doit sûrement virer à grands coups de pied aux fesses ceux qui utilisent chatGPT pour écrire à leur place. En outre, les gens qui demandent à un robot qui a tendance à halluciner « dois-je mettre de l’arsenic dans mon Nesquick ? » ne comptent pas parmi les plus sages.

Toutefois, dès lors qu’on parle d’informatique, l’IA peut s’avérer être un outil redoutable. Il est tout à fait légitime de lui demander : « fais-moi un carrousel en JavaScript pour mon WordPress » (oh, ça va hein, je code déjà assez au bureau, merci), et « comment faire fonctionner ce putain de logiciel à la con ? » (ne soyez pas choqués, ce ne sont que des mots de la langue française, et vos gosses entendent pire dans la cour de récré). Bref ! Là où je voulais en venir, c’est que l’ami Microsoft Word n’est vraiment pas doué, pour la césure automatique – césure qui est pourtant recommandée pour la bonne mise en forme d’un roman publié. Le vilain bougre aura tendance à couper des noms propres, ce qui est tout à fait contre l’usage. Je vous partage donc une solution imparable ou presque pour optimiser vos césures, suggérée par mon esclave fait de circuits imprimés, et agrémentée à ma sauce.

Le tutoriel pour optimiser la césure :

1 – Activer la césure automatique dans le document Word. En outre, je recommande d’ajuster les paramètres pour fixer le nombre maximum de césures consécutives à 3.

2 – Enregistrer votre fichier en .docm

3 – Exécuter ALT+F11

4 – Sélectionner « ThisDocument » dans la fenêtre

5 – Dans la zone de texte, coller :

Sub RemoveHyphenationForCapitalizedWords()
    Dim rng As Range

    Set rng = ActiveDocument.Content

    With rng.Find
        .ClearFormatting
        .Text = "<[A-ZÀ-Ÿ][A-Za-zÀ-ÿ]*>"
        .MatchWildcards = True
        .Forward = True
        .Wrap = wdFindStop
    End With

    Do While rng.Find.Execute
        rng.NoProofing = True   ' Empêche la césure sur ce mot
        rng.Collapse wdCollapseEnd
    Loop

    MsgBox "Césure désactivée pour les mots commençant par une majuscule."
End Sub

6 – Enregistrer en cliquant sur la disquette

7 – Fermer la fenêtre Microsoft VBA.

8 – Dans votre document Word, exécuter la requête avec ALT+F8.

Pour rétablir la césure sur un mot précis :

1 – Sélectionner le mot concerné

2 – En bas, cliquer sur « Français (France) » (à côté de la petite icone de livre)

3 – Décocher « Ne pas vérifier l’orthographe ou la grammaire » 

Je n’avais jamais travaillé avec les Macros auparavant. Faut dire, je suis auteur, pas proxénète.
AdS