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.