Saltar al contenido

Borrar palabras sin faltas ortograficas


Recommended Posts

publicado

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

publicado

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]

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.

×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.