Parece que no ha colado. Me da el mismo error de antes, pero ahora al depurar me marca esta otra línea:
Cita: Set qdf = CurrentDb.QueryDefs("ConsultaInteractiva")
de momento no voy a poner la línea de código en la que abres el informe, porque lo estoy creando ahora mismo, no vaya a fallar por ahí ahora.
La ConsultaInteractiva la crea el propio código no? no tendrá que estar creada con anterioridad? si es así no está creada.