Buscar por mes y Cargar a Combobox
Hola te cuento problema para que me ayudes por favor, tengo una base de datos en excel, lo importante son dos campos, ID que es un numero para identificar a un individuo y el Campo FECHA (dd-mm-yyyy). Quiero buscar los ID de un cierto mes, por ejemplo seleccionar en un combobox1 el numero 5 (correspondiente a mayo) y que en un combobox2 se carguen los ID que tengan como fecha el mes de mayo.
Espero tu respuesta, Saludos.
1 respuesta
Suponiendo que tienes tus datos así:
A B C D
1 ID FECHA MESES
2 2 01-May 1
3 4 02-Abr 2
4 6 02-May 3
5 8 03-Abr 4
6 5
7 6
8 7
9 8
10 9
11 10
12 11
13 12
Instrucciones para UserForm
1. Abre tu hoja de excel
2. Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
3. En el menú elige Insertar / UserForm
4. En el panel del UserForm creas 2 ComboBox, que se llame ComboBox1 y ComboBox2
5. Le das dobleclick al ComboBox1 y copias la macro
Private Sub ComboBox1_Change()
'por.dam
ComboBox2.Clear
For i = 2 To Range("A" & Rows.Count).End(xlUp).Row
If Month(Cells(i, "B")) = Val(ComboBox1) Then
ComboBox2.AddItem Cells(i, "A")
End If
Next
ComboBox2.SetFocus
End Sub
Private Sub UserForm_Activate()
ComboBox1.RowSource = "D2:D13"
End Sub
Saludos. Dam
Si es lo que necesitas.
Gracias, es justamente la idea que tenía, pero al elegir algunos meses no me cargan todos los ID que deberían cargarse al combobox 2...que podría ser? revise el formato fecha, que se encuentrn dentro del rango
Puede ser, que no tengas información en la columna A o que en la columna B, no sea una fecha.
Revisa los datos, prueba con los datos que te puse y después agrega más datos.
Saludos. Dam
