Identificar cantidad de ítems en cuadro de lista

Puede ser necesario identificar la cantidad de items que un cuadro de lista tenga a disposición, ya sea por control o por validación de la programación y para lograr esto se puede utilizar la Propiedad ListCount.

Objeto Cuadro de Lista: con el uso de este Objeto, se habilita la interacción entre el usuario y el programa permitiendo seleccionar uno o varios elementos de una lista.

Lo primero es ingresar al editor de Visual Basic, puede ser con la combinación de teclas Alt + F11 y en la ventana del Explorador de proyectos, ubicamos el libro de trabajo donde queremos insertar el formulario para lo cual damos clic derecho y seleccionamos la opción Insertar de la cual se despliegan tres opciones y finalmente, clic en la opción UserForm:

De esta manera, se inserta el formulario el cual se puede observar dentro de la “estructura” del explorador de proyectos como un Objeto más del libro de trabajo:

Nos ubicamos en la ventana de herramientas que se presenta como una ventana flotante:

La herramienta de Cuadro de Lista se encuentra generalmente seguida del Objeto Cuadro Combinado:

Lo seleccionamos con un clic y luego en el formulario se ingresa el Cuadro de Lista con clic en el espacio donde se requiera y también se puede adicionar una Etiqueta para indicar la información que se incluye en la lista quedando de la siguiente manera:

Vamos a llenar este cuadro de lista con el mismo método observado en la entrega pasada donde lo primero es ingresar directamente desde el editor VBA y para ello damos doble clic en cualquier área gris del formulario (desde el editor VBA) quedando activa la ventana de programación del formulario:

Ahora pasamos a seleccionar de la lista de eventos ubicada en la esquina superior derecha, el evento Activate:

Y con esto aparece una nueva estructura de código VBA en la cual debemos ingresar el siguiente código:

ListaPaises.List = Array("Colombia", "Argentina", "Brasil")

Y debajo de este el siguiente código:

MsgBox "La lista contiene " & ListaPaises.ListCount & " paises"

Queda de la siguiente forma en el editor VBA:

La penúltima última línea sirve para presentar en un mensaje la cantidad de líneas que contiene el Cuadro de lista:

Descargar archivo de trabajo.

Contenido relacionado:
Compartirlo
Gerencie.com en su correo.

Suscríbase y nosotros colocaremos en su bandeja de entrada la mejor información que generamos diariamente.

Déjenos su opinión

En Gerencie.com está permitido opinar, criticar, discutir, controvertir, disentir, etc., pero debe hacerlo sin insultar y sin ofender a otros.

Información legal aplicable para Colombia.