Conocer cómo eliminar texto tachado con VBA le permite borrar rápidamente el contenido potencialmente distracción de su documento . Desde VBA no requiere la intervención del usuario para realizar esta tarea , puede hacerlo sin errores humanos. La función de VBA en el centro de este proyecto es la propiedad "Fuente" de la clase "Rango" , de la que todas las palabras en sus documentos son miembros . La propiedad "Fuente" tiene varias propiedades de los componentes que almacenan todo el formato se aplica a una palabra , como por ejemplo el efecto de tachado . Instrucciones
1
Press " control " y "N " para crear un nuevo documento de Word, a continuación, escriba algunas palabras en él. Haga doble clic en una palabra para seleccionarla y, a continuación, pulsar la tecla " Control" y " D " al mismo tiempo para que aparezca el cuadro de diálogo "Fuente" . Haga clic en la casilla de verificación " tachado " para este efecto en la palabra, haga clic en " Aceptar " para cerrar el cuadro de diálogo .
2
clic elemento " Opciones" de la pestaña "Archivo" y , a continuación, haga clic en el " Personalizar cinta de " mando del " panel Categorías . " Estas acciones le llevan a la opción para activar la pantalla de la ficha " desarrolladores" , que tiene el botón para trabajar con VBA.
3
Haga clic en la casilla " desarrollador " para que Word muestra el " desarrollador ", luego haga clic en" Aceptar "para cerrar el " Opciones " cuadro de diálogo.
4
clic en el botón" Visual Basic " " de la pestaña " Developer para abrir el entorno de desarrollo de Visual Basic , que permite para escribir, editar y depurar programas.
5
clic comando " Módulo " del menú " Insertar" para crear una nueva ventana de programas que entran , a continuación, pegue el siguiente programa en la nueva ventana. Este programa lee la propiedad " tachado " de cada palabra en el documento actual y borra la palabra si el valor de esa propiedad es " verdadero ". El programa utiliza la función "Borrar" de la palabra, que los programadores de VBA llaman un " método" para llevar a cabo la eliminación.
DelStrikeThrough Public Sub ()
Dim w
ActiveDocument
For Each w In. palabras
Si w.Font.StrikeThrough = True Luego
w.Delete
End If
< p > Siguiente
extremo con
End Sub
6
click en cualquiera de las declaraciones del programa, a continuación, haga clic en " Step into " del menú " Debug " de comandos, lo que permite ejecutar un programa una instrucción a la vez. Ejecución de un programa de esta manera ayuda a entender el efecto de cada declaración.
7
Prensa "F8" repetidamente para avanzar el cursor a la siguiente instrucción del programa . Tenga en cuenta que el programa sólo se ejecuta la instrucción "Delete " una vez - . Para la palabra con la fuente tachado ha aplicado en el paso uno
8
Continuar pulsando "F8" hasta que desaparezca el punto culminante , lo que indica el programa ha terminado de ejecutarse.
9
clic en el icono de " Word " en la barra de tareas de Windows para volver a Word. Observe que la palabra con la fuente tachado ha sido eliminado.