Comment convertir toutes les notes de fin en texte brut dans Word
La conversion des notes de fin en texte vous permettra de les modifier ou de les supprimer. Par exemple, si vous souhaitez sélectionner les notes de fin avec l'autre texte normal à la fois, Word ne vous permettra pas de le faire. Comment pouvez-vous le faire facilement? Ce didacticiel vous montrera plusieurs méthodes de conversion de notes de fin en texte brut.
Convertir manuellement les notes de fin en texte
Convertir les notes de fin en texte avec VBA
Convertir les notes de fin en texte avec Kutools for Word
Convertir manuellement les notes de fin en texte
1. Placez le curseur sur l'emplacement des notes de fin, puis appuyez sur Ctrl + A pour sélectionner toutes les notes de fin du document. Voir la capture d'écran:
2. presse Ctrl + C pour copier les notes de fin.
3. presse Ctrl + Fin pour déplacer le curseur à la fin du document entier et avant les notes de fin.
4. presse Ctrl + V pour coller la note de fin à la fin du document. L'ordre des notes de fin sera intact, mais les notes de fin collées ont été modifiées. Voir la capture d'écran:
5. Remplacez manuellement tout le numéro 1 avant le texte par la liste de numéros d'origine.
Convertir les notes de fin en texte avec VBA
Dans Word, vous pouvez également convertir les notes de fin en texte brut avec du code VBA.
1: Appuyez sur Alt + F11 ouvrir un Fenêtre Microsoft Visual Basic pour Applications;
2: Cliquez sur Module de insérer , copiez et collez le code VBA suivant dans le Module fenêtre;
3: Cliquez sur Courir bouton ou appuyez sur F5 pour appliquer le VBA.
Le VBA qui convertit les notes de fin en texte:
Sous convertendnote ()
Diminuer une note de fin comme note de fin
Pour chaque aendnote dans ActiveDocument.
ActiveDocument.Range.InsertAfter vbCr & aendnote.Index _
& vbTab & aendnote.Range
aendnote.Reference.InsertBefore "a" & aendnote.Index & "a"
Note suivante
Pour chaque aendnote dans ActiveDocument.
aendnote.Reference.Delete
Note suivante
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
Avec Selection.Find.Replacement.Font
.Superscript = Vrai
Terminer par
Avec Selection.Find
.Text = "(a) ([0-9] {1,}) (a)"
.Replacement.Text = "\ 2" v .Forward = Vrai
.Wrap = wdFindContinue
.Format = Vrai
.MatchWildcards = Vrai
Terminer par
Selection.Find.Execute Remplacer: = wdReplaceAll
End Sub
Remarque: Vous pouvez modifier le début et la fin de la macro pour répondre à vos goûts.
Convertir les notes de fin en texte avec Kutools for Word
Pour ces nouvelles mains informatiques, VBA est trop complexe à gérer. Mais avec Kutools for Word installé, vous pouvez convertir rapidement toutes les notes de fin en texte avec Convert Endnotes to Text utilitaire en un clic.
Kutools for Word, avec plus de fonctions pratiques, facilite votre travail. | ||
Après l'installation de Kutools pour Word, veuillez procéder comme ci-dessous :(Téléchargez gratuitement Kutools pour Word maintenant !)
1. Veuillez appliquer cet utilitaire en cliquant sur Kutools > Convertir > Convert Endnotes to Text. Voir la capture d'écran:
2. Après avoir cliqué Convert Endnotes to Text, vous verrez le résultat comme le montrent les captures d'écran ci-dessous:
Démo: Convertissez toutes les notes de fin en textes dans Word
Article relatif:
Navigation par onglets et édition de plusieurs documents Word / classeurs Excel comme Firefox, Chrome, Internet Explore 10! |
Vous êtes peut-être habitué à afficher plusieurs pages Web dans Firefox/Chrome/IE et à basculer entre elles en cliquant facilement sur les onglets correspondants. Ici, Office Tab prend en charge un traitement similaire, qui vous permet de parcourir plusieurs documents Word ou classeurs Excel dans une fenêtre Word ou Excel, et de basculer facilement entre eux en cliquant sur leurs onglets. |