Recorrer los controles en Excel VBA

buen día, soy Miguel y durante el dia de hoy os traigo un nuevo artículo.

Con solo unas pocas líneas de código, podemos recorrer los controles ahora Formulario de usuario de Excel VBA. El formulario de usuario que vamos a crear se ve así:

Recorrer los controles en Excel VBA

Para crear este formulario de usuario, realice los siguientes pasos.

1. Abra el Editor de Visual Basic. Si el Explorador de proyectos no está visible, haga clic en Ver, Explorador de proyectos.

2. Haga clic en Insertar, formulario de usuario. Si la caja de herramientas no aparece automáticamente, haga clic en Ver, caja de herramientas. Su pantalla debe configurarse de la siguiente manera.

Visualización de la pantalla del formulario de usuario en Excel VBA

3. Agregue la etiqueta, las casillas de verificación (la primera en la parte superior, la segunda debajo de la primera, etc.) y el botón de comando. Una vez completado, el resultado debe ser coherente con la imagen del formulario de usuario que se muestra arriba. Por ejemplo, cree un control de casilla de verificación haciendo clic en CheckBox en la caja de herramientas. A continuación, puede arrastrar una casilla de verificación al formulario de usuario.

4. Puede cambiar los nombres y subtítulos de los controles. Los nombres se utilizan en el código Excel VBA. Los subtítulos son los que aparecen en pantalla. Es una buena práctica cambiar el nombre de los controles, pero no es necesario aquí porque solo tenemos algunos controles en este ejemplo. Para cambiar el título, la etiqueta, las casillas de verificación y el botón de comando del formulario de usuario, haga clic en Ver, Ventana Propiedades y haga clic en cada control.

5. Para mostrar el formulario de usuario, coloque un botón de comando en su hoja de trabajo y agregue la siguiente línea de código:

Privado Sub CommandButton1_Click ()

UserForm1.Show

Aleta Sub

Ahora hemos creado la primera parte del formulario de usuario. Aunque se ve bien, no pasará nada cuando hagamos clic en el botón Eliminar.

6. Abra el Editor de Visual Basic.

7. En el Explorador de proyectos, haga doble clic en UserForm1.

8. Haga doble clic en el botón Eliminar.

9. Agregue las siguientes líneas de código:

Privado Sub CommandButton1_Click ()

Oscuro contr Cómo control

Para Cada contr En UserForm1.Controls
TypeName (contr) = "CheckBox" Entonces

Contr.Value = Falso
Aleta
Entonces

Aleta Sub

Explicación: Excel VBA atraviesa todos los controles en el formulario de usuario. La función TypeName se utiliza para filtrar los controles en las casillas de verificación. Si controla una casilla de verificación, Excel VBA desmarca la casilla de verificación. contr se elige al azar aquí, puede usar cualquier nombre. Recuerde verificar este nombre en el resto de su código.

Resultado haciendo clic en el botón Eliminar:

Recorrer los controles de resultados

Deja una respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *

Subir

Esta página utiliza Cookies. Más info