Utilizamos cookies propias y de terceros para mejorar la experiencia de navegación, y ofrecer contenidos y publicidad de interés. Al continuar con la navegación entendemos que se acepta nuestra política de cookies.
Tengo la Base de datos abierta en Bdd y he definido Aux como recordset
Set Aux = Bdd.OpenRecordset("Epigrafes") Do Until Aux.EOF Combo(6).AddItem Aux!Numero Combo(7).AddItem Aux!Numero Combo(8).AddItem Aux!Numero Aux.MoveNext Loop Aux.Close