elangelitous

Sveinbjorn El Rojo respondió: Es que no le estás asignando el valor a un campo, si no a una variable llamada "terminado". Lo que tienes que hacer es poner en vez de terminado = valormax es Me.Nombredelcampo=valormáximo, o rst.Fields(18)=valormaximo.

Sveinbjorn El Rojo respondió: Puedes probar con algo como esto: Dim db As Database Dim miSQL As String Dim qry As QueryDef Set db= CurrentDb miSQL = "SELECT....." 'Creas la consulta Set qry = db.CreateQueryDef("CTemp", miSQL) Abres la consulta DoCmd. OpenQuery "CTemp", acNormal,...

Sveinbjorn El Rojo respondió: Igual tu problema está en que no te fijaste en este párrafo: "Como nota genérica a todo el proceso comentar que, al contar los días, la fecha de inicio no se cuenta, mientras que sí se cuenta la fecha final. Es decir, que si contamos del día 1 al día...

xavi -ae soft- respondió: Lo complicas de narices... (Obviando declaración de variables) Opción 1: con el recordset (este casi lo tenias) Set rs = CurrentDb.OpenRecordset("SELECT " & strCampo & " FROM " & strTabla) Do Until rs.EOF rs.Edit rs(strCampo) = Null rs.Update Loop...

xavi -ae soft- respondió: Debo suponer que un numero dado sólo puede encontrarse dentro de un solo rango, ¿verdad? En ese caso me parece que este código bastaría Dim rst As DAO.Recordset ' Suponiendo que los campos 2 y 3 de la tabla nombres se llamen inicio y fin Set rst =...