Jump to content

Borrar palabras sin faltas ortograficas


Recommended Posts

Buenas tardes capos del Word!

Existe alguna forma de mi pagina de word poder borrar automaticamente todas las palabras que no necesiten correction de faltas ortograficas?

Anexo una foto de mi hoja, no subi el word ya que a lo mejor ustedes tienen en ingles y no vea faltas ortograficas etc.

El caso es borrar todo lo que no tenga la rayita roja de correccion...debajo

Gracias anticipadas!!!!!!

Word incorrecto.xls

Link to comment
Share on other sites

Saludos Juan. Aquí le mando una opción para resolver su dilema con macros. En el caso actual (porque resulta más comodo). Lo que hace la macro es copiar todos los textos que tengan errores ortográficos en un nuevo documento en forma de columnas. Así es más fácil me parece.

Haga lo siguiente:

Aprete ALT+F11 para que se abra el visual basic for aplications

De ahí aprete control+r para abrir la ventana del explorador de proyectos.

Busque en el explorador "ThisDocument" haga doble click sobre el y en ese cuadro pegué el siguiente código

 Sub ListarErrores()

Dim rango As Range
Dim docbase As Document
Dim docnuevo As Document
Set docbase = ActiveDocument

If docbase.SpellingErrors.Count > 0 Then 'Si existen errores en _
el documento actual

Set docnuevo = Documents.Add 'Se crea un nuevo documento

For Each rango In docbase.SpellingErrors 'Por cada error _
detectado

docnuevo.Range.InsertAfter rango.Text & vbCr 'Se copia al _
nuevo documento un error debajo del otro

Next
Else 'Si no encontrará errores ortográficos
MsgBox "No se encontraron textos para corregir" 'Manda este _
mensaje
End If
End Sub[/CODE]

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.

Guest
This topic is now closed to further replies.
×
×
  • Create New...

Important Information

Privacy Policy