Saltar al contenido principal

Cómo convertir todas las notas al final a texto sin formato en Word

Convertir notas al final en texto será conveniente para editarlas o eliminarlas. Por ejemplo, si desea seleccionar las notas al final con el otro texto normal a la vez, Word no le permitirá hacerlo. ¿Cómo puedes hacerlo fácilmente? Este tutorial le mostrará varios métodos para convertir notas al final en texto sin formato.

Convertir notas al final en texto manualmente

Convierta notas al final en texto con VBA

Convierta notas al final en texto con Kutools para Wordbuena idea3


Convertir notas al final en texto manualmente

1. Coloque el cursor en el lugar donde se encuentran las notas al final, luego presione Ctrl + A para seleccionar todas las notas al final del documento. Ver captura de pantalla:

2. Prensa Ctrl + C para copiar las notas al final.

3. Prensa Ctrl + End para mover el cursor al final de todo el documento y antes de las notas al final.

4. Prensa Ctrl + V para pegar la nota al final del documento. El orden de las notas al final estará intacto, pero se cambiaron las notas al final pegadas. Ver captura de pantalla:

5. Reemplace todo el número 1 antes del texto con la lista de números original manualmente.


Convierta notas al final en texto con VBA

En Word, también puede convertir notas al final a texto sin formato con código VBA.

1: Presione Alt + F11 abrir una Ventana de Microsoft Visual Basic para aplicaciones;

2: Click Módulo en recuadro pestaña, copie y pegue el siguiente código VBA en el Módulo ventana;

3: Click Ejecutar botón o prensa F5 para aplicar el VBA.

El VBA que convierte notas al final en texto:

Subconvenrtendnote ()
Dim aendnote como nota al final
Para cada nota final en ActiveDocument.
ActiveDocument.Range.InsertAfter vbCr & aendnote.Index _
& vbTab & aendnote.Range
aendnote.Reference.InsertBefore "a" & aendnote.Index & "a"
Nota siguiente
Para cada nota final en ActiveDocument.
nota final.Referencia.Eliminar
Nota siguiente
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
Con selección.Encontrar.Reemplazo.Fuente
.Superscript = Verdadero
End With
Con Selection.Find
.Texto = "(a) ([0-9] {1,}) (a)"
.Replacement.Text = "\ 2" v .Forward = True
.Wrap = wdFindContinue
.Format = Verdadero
.MatchWildcards = Verdadero
End With
Selection.Find.Execute Replace: = wdReplaceAll
End Sub

Nota: Puede cambiar el principio y el final de la macro para que se adapte a su gusto.


Convierta notas al final en texto con Kutools para Word

Para aquellos nuevos usuarios de computadoras, VBA es demasiado complejo de manejar. Pero con Kutools for Word instalado, puede convertir rápidamente todas las notas al final en texto con Convert Endnotes to Text utilidad con un clic.

Kutools for Word, con más de  funciones prácticas, facilita su trabajo. 

Después de instalar Kutools para Word, haga lo siguiente:(¡Descarga gratis Kutools para Word ahora!)

1. Aplique esta utilidad haciendo clic en Kutools > Convertir > Convert Endnotes to Text. Ver captura de pantalla:

doc kutools convierte notas al final en texto 1

2. Después de hacer clic Convert Endnotes to Text, verá el resultado como muestran las siguientes capturas de pantalla:




Artículo relativo:


Navegación con pestañas y edición de varios documentos de Word / libros de trabajo de Excel como Firefox, Chrome, Internet Explore 10.

Es posible que esté familiarizado con ver varias páginas web en Firefox / Chrome / IE y cambiar entre ellas haciendo clic fácilmente en las pestañas correspondientes. Aquí, Office Tab admite un procesamiento similar, que le permite examinar varios documentos de Word o libros de trabajo de Excel en una ventana de Word o de Excel, y cambiar fácilmente entre ellos haciendo clic en sus pestañas.
¡Haga clic para obtener una prueba gratuita de Office Tab!

Explore varios documentos de Word en una ventana como Firefox
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Thank for the macro! Super helpful!

(Fyi - you have a "v" where there should be a linefeed by ".Forward", but you saved me a couple of hours of figuring out writing my own. Awesome!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations