Dans cet article, nous aimerions vous montrer 4 façons simples et rapides de convertir des textes horizontaux et verticaux dans votre document Word.
De temps en temps, nous sommes susceptibles de disposer des textes en horizontal ou vertical dans notre document. Ensuite, il y a des chances de convertir un texte horizontal en un texte vertical. Retaper à nouveau toutes les informations prendrait du temps et de la patience.
Par conséquent, nous voulons vous proposer 4 façons de changer un texte horizontal en un texte vertical et vice versa, comme ci-dessous :
Cas 1 : convertir des textes verticaux en textes horizontaux
Tout d'abord, il existe 2 méthodes pour basculer entre les textes verticaux et horizontaux.
Méthode 1 : Utiliser la fonction "Remplacer"
- Tout d'abord, sélectionnez le texte cible.
- Cliquez ensuite sur l'onglet "Accueil".
- Ensuite, allez dans le groupe "Edition" et cliquez sur l'option "Remplacer". Ou vous pouvez appuyer sur "Ctrl + H" pour ouvrir la boîte de dialogue "Rechercher et remplacer".

- Placez maintenant le curseur sur la zone de texte "Rechercher quoi", entrez "^p".
- Et dans la zone de texte "Remplacer par", tapez un espace.
- Ensuite, cliquez simplement sur "Remplacer tout".
- Une boîte de dialogue apparaîtra, cliquez simplement sur "Oui".
Méthode 2 : exécuter une macro
- Tout d'abord, cliquez sur l'onglet "Développeur".
- Cliquez ensuite sur "Visual Basic" pour déclencher l'éditeur VBA. L'alternative consiste à appuyer sur "Alt + F11".
- Cliquez ensuite sur le projet "Normal".
- Et cliquez sur "Insérer".
- Choisissez "Module" pour créer un nouveau module dans le projet normal.
- Double-cliquez ensuite sur le module pour ouvrir l'espace d'édition.
- Collez-y les codes suivants :
Sub ConvertVerticalToHorizontalList()
With Selection.Find
.Text = "^p"
.Replacement.Text = " "
.Forward = False
.Wrap = wdFindStop
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub
- Enfin, cliquez sur "Exécuter".
Cas 2 : convertir des textes horizontaux en textes verticaux
Méthode 1 : utilisez à nouveau la fonction "Remplacer"
- Pour commencer, répétez les 3 premières étapes de la méthode 1 du cas 1.
- Cependant, cette fois, dans la boîte de dialogue "Rechercher et remplacer", entrez un espace dans la zone de texte "Rechercher quoi" et "^p" dans la zone "Remplacer par".
- Cliquez ensuite sur "Remplacer tout".
Méthode 2 : exécuter une macro
- De même, suivez les 6 premières étapes de la méthode 2 du cas 1.
- Et cette fois, collez plutôt les codes ci-dessous :
Sub ConvertHorizontalToVerticalList()
With Selection.Find
.Text = " "
.Replacement.Text = "^p"
.Forward = False
.Wrap = wdFindStop
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub
- N'oubliez pas de cliquer sur "Exécuter".
Récupérez votre Lost File
Comme nous devons constamment faire face à des appareils numériques dans le travail de nos jours, nous courons également le risque de perdre des informations critiques. Pour l'éviter, faire des sauvegardes est une excellente solution. Cependant, la sauvegarde nécessite une persévérance au jour le jour. Au fil du temps, votre résolution de faire des sauvegardes de fichiers peut s'effacer au second plan de la vie quotidienne. Et rien n'est une solution miracle, même les sauvegardes. Par conséquent, vous aurez besoin d'un outil de récupération de document Word corrompu.
Introduction de l'auteur:
Vera Chen est une experte en récupération de données dans DataNumen, Inc., qui est le leader mondial des technologies de récupération de données, y compris outil de réparation xlsx endommagé et pdf réparer les produits logiciels. Pour plus d'informations, visitez www.datanumen.com






