300 Ejemplos

Bucle a través de controles

Loop Through Controls

Con solo unas pocas líneas de código, podemos recorrer los controles en una Formulario de usuario de Excel VBA . El formulario de usuario que vamos a crear tiene el siguiente aspecto:

Recorrer los controles en Excel VBA



calcular el número de meses entre dos fechas en Excel

Para crear este formulario de usuario, ejecute 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 como se muestra a continuación.



Configuración de pantalla de formulario de usuario en Excel VBA

3. Agregue la etiqueta, las casillas de verificación (primero en la parte superior, la segunda debajo de la primera, y así sucesivamente) y el botón de comando. Una vez que se haya completado, el resultado debe ser coherente con la imagen del formulario de usuario que se mostró anteriormente. 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 en el formulario de usuario.

4. Puede cambiar los nombres y los títulos de los controles. Los nombres se utilizan en el código Excel VBA. Los subtítulos son los que aparecen en su pantalla. Es una buena práctica cambiar los nombres de los controles, pero no es necesario aquí porque solo tenemos algunos controles en este ejemplo. Para cambiar el título del formulario de usuario, la etiqueta, las casillas de verificación y el botón de comando, 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 SubCommandButton1_Click ()

UserForm1.Show

Fin Sub

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

6. Abra el Editor de Visual Basic .

cómo insertar una hoja de cálculo en Word

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

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

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

Privado SubCommandButton1_Click ()

NingunocontrComocontrol

Para CadacontrEnUserForm1.Controls
SiTypeName (contr) = 'CheckBox'Entonces
contr.Value = False
Fin Si
Próximo

Fin Sub

Explicación: Excel VBA recorre todos los controles del formulario de usuario. La función TypeName se utiliza para filtrar los controles de la casilla de verificación. Si un control de casilla de verificación, Excel VBA desmarca la casilla de verificación. contr se elige al azar aquí, puede usar cualquier nombre. Recuerde hacer referencia a este nombre en el resto de su código.

Resultado al hacer clic en el botón Borrar:

Resultado de los controles en bucle

8/11 Completado! Obtenga más información sobre los formularios de usuario>
Ir al capítulo siguiente: Abarcar



^