Cargar un ComboBox con datos filtrados de una tabla

¡Importante!: Colabora con el grupo. Contesta a este mensaje
y dinos si te sirvió o no la respuesta dada. Muchas gracias
Hola!
dentro del bucle, antes de hacer el additem verifica si se cumple esa otra
condición y según eso lo haces o no.

Saludos a todos
Emilio [MS-MVP Access 2006/11]
miliuco56 ALGARROBA hotmail.com
http://www.mvp-access.com/foro
http://www.mvp-access.es/emilio

escribió en el mensaje de
noticias:

Buenas,

Quiero cargar unos datos de la tabla SOCIOS en un ComboBox en un formulario
VBA, y lo que escribí fue lo siguiente:

Private Sub UserForm1_Initialize()
Dim rango, celda As Range
Set rango = Range("MyList")
For Each celda In rango
ComboBox1.AddItem celda.Value
Next celda
End Sub

Donde MyList es una lista dinámica de una columna de la tabla SOCIOS.

Lo que me interesaria sería poder discriminar de esa lista los valores que
cumplen con un cierto criterio (activos/no activos), especificado en otra
columna de la tabla SOCIOS.

Como debería hacerlo? Aunque vengo de VBA Acces, soy novatillo en Excel.

Gracias