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

Extracción de 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 y el nombre del cuadro de texto para acceder a su valor. Utilice el objeto " Objeto OLE " para eliminar un objeto, como un cuadro de texto a partir de una hoja de cálculo. Este objeto representa un control ActiveX en una hoja de cálculo que contiene la propiedad "Eliminar" que se puede utilizar para quitar un control. Cosas que necesitará
Microsoft Excel
Ver Más instrucciones
1

lanzamiento Microsoft Excel , haga clic en la pestaña de " desarrolladores" y haga clic en el icono "Insertar " que se encuentra en los controles panel . Haga clic en " Cuadro de texto " por debajo de los controles ActiveX y haga clic en cualquier celda en la que desee insertar el cuadro de texto. Añadir un nuevo botón con la misma técnica .

2 Haga clic en " Macros " y tipo " removeBlankTxtBox " debajo del nombre de la macro y haga clic en " Crear" para crear una nueva macro.

3

Escriba lo siguiente para capturar errores si los hay :

On Error GoTo Err_removeBlankTxtBox :
4

Agregue el código siguiente para comprobar si el cuadro de texto está en blanco y eliminar que si es verdad :

Si ActiveSheet.TextBox1.Value = "" Then
Sheet1.OLEObjects

( " TextBox1 ") Eliminar

End If
< br . > 5

Agregue el siguiente código para controlar los errores :

Exit_removeBlankTxtBox :

Exit Sub

Err_removeBlankTxtBox :

Resume Exit_removeBlankTxtBox :
Página 6

volver 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 es en blanco.