Saltar al contenido

Filtrar datos de un listbox

publicado

Mi consulta es la siguiente: tengo un listbox dentro de un userform en el cual se listan los archivos que se encuentran dentro de una carpeta mediante la siguiente macro:

ListBox1.Clear

Set fso = CreateObject("Scripting.FileSystemObject")

Ruta = ThisWorkbook.Path

Set Carpeta = fso.GetFolder(Ruta)

Set ficheros = Carpeta.Files

For Each Archivo In ficheros

ListBox1.AddItem Archivo.Name

Next Archivo

Necesito que en otro listbox (listbox2) se muestren los items del listbox1 que cumplan con la condición de empezar con la letra "P".

Agradecería que me dieran una idea de como hacerlo.

Desde ya muchas gracias

Featured Replies

publicado

ListBox1.Clear: ListBox2.Clear

Set fso = CreateObject("Scripting.FileSystemObject")

Ruta = ThisWorkbook.Path

Set Carpeta = fso.GetFolder(Ruta)

Set ficheros = Carpeta.Files

For Each Archivo In ficheros

ListBox1.AddItem Archivo.Name

If Left(Archivo.Name, 1) = "P" Then ListBox2.AddItem Archivo.Name

Next Archivo

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.