Lancement "Parole", cliquez sur l'onglet "Developer" et cliquez sur "Visual Basic" pour ouvrir l'éditeur Visual Basic. Cliquez sur le menu "Insertion" et cliquez sur "Module".
Commencez par taper le code VBA suivant pour créer une nouvelle procédure sous:
Private Sub CenterText ()
Déclarez deux variables que vous allez utiliser pour tenir le début et la fin du texte que vous voulez du centre:
Dim FirstWord As String
Dim lastWord As String
Définir les mots commençant et se terminant dans les mots votre paragraphe, telles que les suivantes:
FirstWord = "début du paragraphe"lastWord = "fin du paragraphe"
Copiez et collez le code ci-dessous pour rechercher le document Word en utilisant les variables que vous avez définies et centrer le texte entre eux:
Avec ActiveDocument.Content.Duplicate.Find.Execute FindText: = FirstWord "*" lastWord, MatchWildcards: = Vrai
.Movestart wdCharacter, Len (FirstWord)
.MoveEnd wdCharacter, -Len (lastWord)
.ParagraphFormat.Alignment = wdAlignParagraphCenter
End With
Fin de la sous-procédure en tapant ce qui suit:
End Sub