Aprende VBA para Access

Rellenar los valores a elegir en un desplegable con un bucle

Prueba ahora LinkedIn Learning sin cargo y sin compromiso.

Prueba gratis Mostrar modalidades de suscripción
En este vídeo veremos cómo podemos rellenar los valores que toma un desplegable desde un bucle. Esto se suele hacer con mucha frecuencia para después hacer algo con esos valores elegidos dentro de esa lista.

Transcripción

Vamos a ver ahora cómo podemos trabajar con las listas o bien, con los cuadros combinados para poder añadir y quitarle valores a estas listas. Para ello, he preparado un ejemplo aquí en el cual tenemos varios cuadros de texto, una lista y varios botones. Lo primero que tenemos aquí es un cuadro de texto al cual he llamado "valor", en el cual escribiremos algo y cuando le demos al botón de añadir se añadirá ese valor que hemos escrito en la lista. La lista, como vemos, se llama "lista". Cuando la hemos creado, si no le decimos lo contrario en la ficha de datos, está puesta como "Tabla de consulta", le tenemos que decir "Lista de valores" porque vamos a introducir los valores desde el código. En la parte de abajo tenemos, también, otro cuadro de texto que hemos llamado "Cuenta". Ahí nos irá poniendo cuántos elementos tiene la lista. También tendremos el cuadro de texto "Comienzo" y el cuadro de texto "Final", en el cual, nosotros podremos poner desde qué número y hasta qué número queremos añadir a ese intervalo. Nos irá poniendo todos los valores que haya entre esos dos números. El botón de "Borrar" borrará algún elemento de la lista y "Cerrar" cerrará el formulario. Entonces, vamos a empezar por el botón de "Añadir". Vamos a ir a Eventos y quiero ver este código. Entonces, lo primero que hacemos aquí es que nos situamos en el campo "valor", ya que si no, no nos va a dejar ejecutar el código. Para ello, le damos la orden: valor.SetFocus. Con el Focus situamos el cursor en ese campo. Después indicamos que a la lista añadimos un valor. ¿Qué valor es el que queremos añadir? El del campo "valor.Value" O sea, el valor que tenemos en el campo "valor". A continuación, quiero que me diga cuántos elementos tengo en esta lista. Le digo que en el campo "cuenta" es igual al número de elementos de la lista. Eso se lo digo con: "Lista.ListCount". De esta manera ya podemos ir añadiendo los valores a la lista. Vamos a probarlo. Escribimos aquí los valores que queremos añadir. Yo puedo ir añadiendo todos los valores que nosotros queramos y vemos cómo al añadir me va poniendo el número de elementos. Vamos a seguir viendo el código. Ahora, lo siguiente que vamos a hacer es el botón de borrar. Aquí en borrar, lo que le indicamos es qué elemento queremos borrar. Para ello, nosotros le tenemos que indicar con la orden "Lista.RemoveItem" E indico el elemento que yo quiero borrar. ¿Cuál es el que quiero borrar? El que está seleccionado. O sea, el "value" de la lista. El valor que está seleccionado. Y lo que hago es que me vuelva a contar el número de elementos que hay para que se vaya sincronizando el cuadro de texto con los valores que tengo. Vamos a verlo. Vamos a volver a minimizar esto. Nos cambiamos de vista. Vamos a ir añadiendo valores. Le digo añadir y selecciono cualquiera. Y aquí le digo "borrar", y vemos que ya quedan dos y se queda en el número de elementos que nosotros le hemos dicho. Vuelvo al diseño. Y ahora, en lo siguiente, añadir intervalo. Aquí sí que vamos a tener que utilizar nosotros un bucle en el cual yo le digo: "Dim i As Integer", o sea, me declaro una variable a la que llamo "i" y le digo que "i" sea igual al campo "comienzo" hasta que llegue al valor que tiene el campo "final". Lo que vamos a ir haciendo es añadiendo ese valor de "i" a la lista. Se lo vamos a ir diciendo, "AddItem i" Una vez que ya hemos añadido todos, lo que vuelvo a hacer es que en el campo cuenta me diga cuántos elementos hay. Vamos a probarlo. Cuando volvemos, como no le hemos dicho que refresque, lo que me pone, estos elementos, pero eso se debe a que no le hemos dicho que cada vez que cargue el formulario, ahí, este queda en blanco. Tal vez se lo podemos decir ahora. En el momento que ya pongamos algo, por ejemplo, ahora le voy a decir que comience en el 2, y que llegue hasta el 8. Le digo "Añadir intervalo" y ya tenemos aquí los números y aquí abajo nos dice cuántos elementos hay. Podemos volver al diseño y ahora, por ejemplo, le podría decir que en el "form", al cargar el formulario, le podemos decir que este campo sea igual a comillas, comillas, o sea, el campo "cuenta", al generador de código le digo que "cuenta = " " " De esta manera, nos volvemos. Y ahora ya cuando nos volvemos, sí que está en blanco. Tendríamos que hacer lo mismo para el resto de los campos porque si no, se quedan los valores. En este video hemos estado viendo cómo trabajar con las listas y cómo utilizar los bucles para rellenar las listas. O sea que se utiliza muchísimo a la hora de trabajar con Access para poner los valores predeterminados que queramos en el formulario.

Aprende VBA para Access

Aprende las bases de la programación Visual Basic necesarias para aplicarla en Access y poder crear bases de datos más funcionales de las que el software te ofrece por defecto.

2:07 horas (34 Videos)
Actualmente no hay comentarios.
 

Este curso video2brain está disponible como descarga y para ser visualizado online. ¡Pero no hace falta que decidas entre las dos opciones! Al comprar el curso, disfrutarás de ambas posibilidades.

La descarga te permite ver las lecciones sin estar conectado/a a internet y supone una navegación fácil y ágil entre capítulo y capítulo. Si vas a trabajar en diferentes ordenadores o si no quieres descargarte el curso completo, entra en la web con tus datos de acceso y disfruta directamente de tus vídeos online. Te deseamos que disfrutes de este curso y te resulte de mucha utilidad.

Estamos a tu disposición si tienes cualquier tipo de duda o pregunta.