cuadros de texto son herramientas gráficas que los usuarios de Word Insertar texto en una fácil colocación en una página. Estas herramientas se utilizan a menudo para crear formas, como las solicitudes de empleo . Eliminación de cuadros de texto suele ser tan fácil como borrar otros objetos en Word , como elipses o arte de la palabra . Pero si el cuadro de texto está oculta, se necesitan métodos especiales para localizarlo antes de poder eliminarlo. Uso de Visual Basic para eliminar cuadros de texto es una introducción a extender la funcionalidad de Word a través de este lenguaje de programación. Instrucciones 
 1 
 Word abierto , presione "Control" y " N " para iniciar un nuevo documento. 
 
 2 Haga clic en el menú "Insertar " la partida , a continuación, haga clic en el botón " cuadro de texto " en el " texto " del panel. Word mostrará un cuadro de texto con las instrucciones para el uso de la caja de texto . 
 3 
 tipo sobre el texto didáctico con cualquier texto que usted quisiera . Esto le ayudará a recordar el contenido del cuadro de texto , lo que hará que la localización y eliminación más fácil . 
 
 4 Haga clic en el menú "Ver " la partida , a continuación, haga clic en el botón " Diseño de impresión " de la " documento Views "del panel. 
 5 
 Haga clic en" zoom " botón , a continuación, introduzca " 100 " para el porcentaje de zoom. Esto le permite ver los bordes de la página, que tendrá que mover el cuadro de texto de la página. 
 6 
 Haga clic en uno de los bordes del cuadro de texto y, a continuación , arrástrelo fuera de la página para que que es invisible. El cuadro de texto que ahora no se puede eliminar porque no se puede seleccionar. 
 7 
 Pulse " Alt ", luego " F11 " para entrar en el entorno de desarrollo de Visual Basic . "VB " se refiere a "Visual Basic " de aquí en adelante . 
 8 
 Haga clic en el menú "Insertar " la partida , a continuación, haga clic en la opción " Módulo " . Esto inserta una nueva ventana para introducir un pequeño programa VB que eliminar la caja de texto 
 9 
 Pega el siguiente programa en la ventana de código: . 
 
 Sub DeleteTextBox () 
 
 Dim x 
 
 Dim s 
 
 Para x = 1 Para ActiveDocument.Shapes.Count 
 
 Set s = ActiveDocument.Shapes (x ) 
 
 Detener 
 
 Siguiente x 
 
 End Sub 
 10 
 Press "F5 " para ejecutar el programa. El programa se ejecutará hasta que llega a la cuenta de "Stop" . 
 11 
 Haga clic en la ventana de " inmediato " y escriba " Print ActiveDocument.Shapes.Count . " VB mostrará " 1 ", lo que significa que el documento tiene un cuadro de texto . 
 12 
 Haga clic en la ventana " inmediata " , a continuación, introduzca "Imprimir s.alternativeText . " La ventana mostrará el texto introducido en el cuadro de texto en un paso anterior . Identifica el cuadro de texto que se le elimina 
 13 
 Escriba lo siguiente en la ventana de " inmediato ": ". ActiveDocument.Shapes ( 1 ) borrar. ". 
 14 < p> Repita el paso 11 para imprimir el número de cuadros de texto en el documento. VB mostrará " 0 ", lo que indica que ha eliminado todos los cuadros de texto.