Filtrar listbox con dos combobx

publicado el 25 de julio5 años

Buenos días,

Amigos de foro quisiera solicitar la colaboración de ustedes para resolver lo siguiente, estoy intentando aplicar un filtro a listbox en un form(Userform5), en el cual los criterios del filtro se definen en: mes(combobox1) y día(combobox2), esto sin recurrir al uso de un botón, respetando el encabezado de cada columna y que los valores de ambos combobox sean valores únicos.

Hace pocos días JSDJSD me dío un ejemplo de este tipo de filtro por medio de un combobox pero he sido incapaz de agregar el segundo, adjunto el archivo por si pueden colaborar.

Saludos

Consulta filtro combobox.xlsb

publicado el 25 de julio5 años

En cuanto pueda te subo algo

publicado el 25 de julio5 años

Hola @Jose BN

Aquí te dejo una propuesta para ver si encaja con lo que necesitas. Cualquier modificación, por aquí andaremos.

Que tengas una buena jornada! Suerte!

ae20200725_post43798_consulta filtro combobox.xlsb

publicado el 25 de julio5 años

A mi se me ha ocurrido esto, a ver que tal.

consulta filtro combobox (2).xlsb

publicado el 25 de julio5 años

Autor

Hace 3 horas, tierra_pampa dijo:

Hola @Jose BN

Aquí te dejo una propuesta para ver si encaja con lo que necesitas. Cualquier modificación, por aquí andaremos.

Que tengas una buena jornada! Suerte!

ae20200725_post43798_consulta filtro combobox.xlsb 856.99 kB · 2 descargas

tierra_pampa está muy buena la propuesta, solamente me salta el error al cambiar el día:

Editado el el 25 de julio5 años por Jose BN

publicado el 25 de julio5 años

Autor

Hace 2 horas, Antoni dijo:

A mi se me ha ocurrido esto, a ver que tal.

consulta filtro combobox (2).xlsb 855.06 kB · 1 descarga

Bueno! Antoni

La genialidad está de sobra! está muy buena la opción, seguramente no me hubieran alcanzado los años para lograr algo así.

Saludos

publicado el 26 de julio5 años

Bueno llego tarde, veo que con la aportación del Maestro Antoni y tierra_pampa queda resuelta tu consulta, y me alegro mucho y un saludo para todos.

publicado el 27 de julio5 años

Autor

Muchas gracias!

JSDJSD y a todos!

Tema resuelto...

Archivado

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

Ir al listado de temas

Domina Excel, de Cero a Experto

¿Atascado? Deja de buscar soluciones puntuales. Aprende a dominar Excel para siempre con nuestro curso online. Más de 115 lecciones y soporte directo.

Ver el Curso Completo

194 Archivos
100 Comentarios
30 Revisiones
Última descarga

Nuevo mapa de municipios españoles
- 2

FORMULA EXCEL PARA VALIDAR UN NÚMERO DE CUENTA BANCARIA

Hola Susana.
¿No puedes usar una Macro?
No te preocupes, prueba con esta formula, suponiendo que el IBAN de la cuenta está en A2:
=SI(EXTRAE(A2;13;2)=SI(11-RESIDUO(EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");1;1)*1+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");2;1)*2+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");3;1)*4+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");4;1)*8+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");5;1)*5+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");6;1)*10+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");7;1)*9+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");8;1)*7+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");9;1)*3+EXTRAE(TEXTO(EXTRAE(A2;5;4)*3&EXTRAE(A2;9;4);"0000000000");10;1)*6;11)=10;1;SI(11-RESIDUO(EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");1;1)*1+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");2;1)*2+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");3;1)*4+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");4;1)*8+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");5;1)*5+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");6;1)*10+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");7;1)*9+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");8;1)*7+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");9;1)*3+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");10;1)*6;11)=11;0;11-RESIDUO(EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");1;1)*1+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");2;1)*2+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");3;1)*4+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");4;1)*8+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");5;1)*5+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");6;1)*10+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");7;1)*9+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");8;1)*7+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");9;1)*3+EXTRAE(TEXTO(EXTRAE(A2;5;4)&EXTRAE(A2;9;4);"0000000000");10;1)*6;11)))&SI(11-RESIDUO(EXTRAE(EXTRAE(A2;15;10);1;1)*1+EXTRAE(EXTRAE(A2;15;10);2;1)*2+EXTRAE(EXTRAE(A2;15;10);3;1)*4+EXTRAE(EXTRAE(A2;15;10);4;1)*8+EXTRAE(EXTRAE(A2;15;10);5;1)*5+EXTRAE(EXTRAE(A2;15;10);6;1)*10+EXTRAE(EXTRAE(A2;15;10);7;1)*9+EXTRAE(EXTRAE(A2;15;10);8;1)*7+EXTRAE(EXTRAE(A2;15;10);9;1)*3+EXTRAE(EXTRAE(A2;15;10);10;1)*6;11)=10;1;SI(11-RESIDUO(EXTRAE(EXTRAE(A2;15;10);1;1)*1+EXTRAE(EXTRAE(A2;15;10);2;1)*2+EXTRAE(EXTRAE(A2;15;10);3;1)*4+EXTRAE(EXTRAE(A2;15;10);4;1)*8+EXTRAE(EXTRAE(A2;15;10);5;1)*5+EXTRAE(EXTRAE(A2;15;10);6;1)*10+EXTRAE(EXTRAE(A2;15;10);7;1)*9+EXTRAE(EXTRAE(A2;15;10);8;1)*7+EXTRAE(EXTRAE(A2;15;10);9;1)*3+EXTRAE(EXTRAE(A2;15;10);10;1)*6;11)=11;0;11-RESIDUO(EXTRAE(EXTRAE(A2;15;10);1;1)*1+EXTRAE(EXTRAE(A2;15;10);2;1)*2+EXTRAE(EXTRAE(A2;15;10);3;1)*4+EXTRAE(EXTRAE(A2;15;10);4;1)*8+EXTRAE(EXTRAE(A2;15;10);5;1)*5+EXTRAE(EXTRAE(A2;15;10);6;1)*10+EXTRAE(EXTRAE(A2;15;10);7;1)*9+EXTRAE(EXTRAE(A2;15;10);8;1)*7+EXTRAE(EXTRAE(A2;15;10);9;1)*3+EXTRAE(EXTRAE(A2;15;10);10;1)*6;11)));"Valido";"Erroneo")
¿Demasiado largo?
Bueno, para los que no apreciáis la belleza de la jungla, puedes usar esta otra:
=SI(EXTRAE(A2;13;2)=EXTRAE(12345678910;11-RESIDUO(SUMA(EXTRAE(A2;FILA(INDIRECTO("5:12"));1)*(EXTRAE(37498625;FILA(INDIRECTO("1:8"));1)+1));11);1)&EXTRAE(12345678910;11-RESIDUO(SUMA(EXTRAE(DERECHA(A2;10);FILA(INDIRECTO("1:10"));1)*(EXTRAE(0&137498625;FILA(INDIRECTO("1:10"));1)+1));11);1);"Valido";"No Valido")
Esta última depende de la versión de tu excel deberás usar Control+Mayusculas+Intro.
Saludos.

Por torquemada, · publicado el sábado a las 15:414 días
FORMULA EXCEL PARA VALIDAR UN NÚMERO DE CUENTA BANCARIA

Hola, SUSANA GARCIA-ABAD FERNANDEZ.
En esta respuesta de Antoni
Puede que encuentres la solución.
Saludos.

Por torquemada, · publicado el 27 de noviembre27 nov
ListBox que falla sin razón aparente: ¿Dónde se esconde el error en mi código VBA?

Perfecto, agradece siempre con el corazoncito que hay en la parte inferior derecha, un saludo

Por JSDJSD, · publicado el 27 de noviembre27 nov
ListBox que falla sin razón aparente: ¿Dónde se esconde el error en mi código VBA?

Buenos días apreciado JSDJSD, todo esta perfecto, me arroja lo que esperaba,
Mil Gracias por tus respuestas y tomarte tu tiempo.
Con ello doy por cerrado el tema

Por dorgelis, · publicado el 27 de noviembre27 nov
ListBox que falla sin razón aparente: ¿Dónde se esconde el error en mi código VBA?

Prueba ahora.
ListBox1 ayuda excel ver 1.4.xlsm

Por JSDJSD, · publicado el 26 de noviembre26 nov

No hay usuarios registrado para ver esta página.

Conéctate a Ayuda Excel

Filtrar listbox con dos combobx

Featured Replies

Archivado

Archivos

Nuevo mapa de municipios españoles

Agenda Calendario Vintage

Cómo conservar la función AHORA()

Agenda v01

Gráficos de aranceles con colores difusos

Estadísticas de descargas

Mensajes

FORMULA EXCEL PARA VALIDAR UN NÚMERO DE CUENTA BANCARIA

FORMULA EXCEL PARA VALIDAR UN NÚMERO DE CUENTA BANCARIA

ListBox que falla sin razón aparente: ¿Dónde se esconde el error en mi código VBA?

ListBox que falla sin razón aparente: ¿Dónde se esconde el error en mi código VBA?

ListBox que falla sin razón aparente: ¿Dónde se esconde el error en mi código VBA?

Visualizado recientemente 0

Account

Navigation

Buscar

Configure browser push notifications

Chrome (Android)

Chrome (Desktop)

Safari (iOS 16.4+)

Safari (macOS)

Edge (Android)

Edge (Desktop)

Firefox (Android)

Firefox (Desktop)