Anónimo respondió:
Declaramos las variables Dim db as Database dim rs as Recordset ' activamos la BD Set db=Currentdb ' Creamos el Recordset: Set rs=db.OpenRecordset("Select * from Tabla_mes") ' Recorremos el recordset: Do while not rs. Eof (es decir: mientras no sea...
¿Cómo recorrer una consulta en VBA?