Cómo quitar un cuadro de texto en blanco en VBA

08/28/2010 by Dolan

Cómo quitar un cuadro de texto en blanco en VBA

Eliminar cuadros de texto en blanco en Microsoft Excel utilizando Visual Basic para aplicaciones (VBA) no es tan complicado como usted puede pensar. En VBA, puede utilizar el nombre de la hoja de cálculo y el nombre del cuadro de texto para acceder a su valor. Utilizar el objeto "OLEObject" para quitar un objeto, como un cuadro de texto de una hoja de cálculo. Este objeto representa un control ActiveX en una hoja de cálculo, contiene la propiedad de "Eliminar" que se puede utilizar para quitar un control.

Instrucciones

1 Inicie Microsoft Excel, haga clic en la ficha "Programador" y haga clic en el icono de "Insertar" situado en el panel de controles. Haga clic en "Cuadro de texto" por debajo de los controles ActiveX y haga clic en cualquier celda donde desee insertar el cuadro de texto. Añadir un nuevo botón utilizando la misma técnica.

2 haga clic en "Macros" y tipo "removeBlankTxtBox" bajo el nombre de la macro y haga clic en "Crear" para crear una nueva macro.

3 escriba lo siguiente para capturar errores eventuales: en Error GoTo Err_removeBlankTxtBox:

4 agregue el código siguiente para comprobar si la casilla está en blanco y eliminar si es cierto: si ActiveSheet.TextBox1.Value = "" entonces Sheet1.OLEObjects("Textbox1"). Borrar el final si

5 agregue el siguiente código para manejar los errores: Exit_removeBlankTxtBox: Exit Sub Err_removeBlankTxtBox: Exit_removeBlankTxtBox CV:

6 cambiar a Microsoft Office Excel y haga clic en el botón. Haga clic en "Asignar macro..." y haga clic en "removeBlankTxtBox." Haga clic en "Aceptar". Haga clic en "Botón 1" para ejecutar la macro y quitar el cuadro de texto si está en blanco.

Related Articles

© 2018 - cyberdiggs.com | Contact us: webmaster# cyberdiggs.com