Visual Basic - Ayuda con Report Manager

Hola, estoy trabajando con Vb6 y report manager ( Activex) , y estoy teniendo un problema que no he podido resolver

Tengo una grilla , donde seleccionando la celda requerida (actualiza una base de dato Auxiliar con los datos a Imprimir ) y luego presionando un Command , me muestra en informe.

Esta es la Conexion que tengo en el Command

Private Sub Command2_Click()
Report.FileName = App.Path & "\Presupuesto.rep"
Report.Preview = True
Report.ShowPrintDialog = False
Report.Execute
End Sub

Ok, hasta aqui todo Barbaro, Ahora quiero que al hacer dobleClick sobre la Celda , me haga lo mismo

Pero que pasa me tira error en el Report.Execute, el mensaje dice
"Error '-2147418113(8000ffff)' en tiempo de ejecucion:
No data available to print "

Ya revise la Tabla Auxiliar de impresion y tiene los datos actualizados.

Creo que el Report debe quedar cargado y no se como vaciarlo.

Por favor si alguien puede ayudarme

Se los Agradesco.

Diego M.

Es verdad tu teoria antes de generarlo nuevamente debes cerrarlo, yo para cerrar un reporte hago esto

With DTETodasLasNotas.rsCmdTodasLasNotas

If .State = adStateOpen Then
.Close
End If
End With

esto es con un dataenvironment pero adecualo a lo tuyo y estará solucionado. lo ideal es que lo cierres al final del mismo evento no afecta en la visualizacion y deja listo para cualquier reporte de inmediato

Saludos

Santiago , desde ya gracias por tu respuesta .

estoy tratando de adaptarlo , pero no entiendo muy bien tu ejemplo.

Lo que hice y me anda a medias es colocar un On Error Resume Next

Private Sub Command2_Click()
On Error Resume Next
Report.FileName = App.Path & "\Presupuesto.rep"
Report.Preview = True
Report.ShowPrintDialog = False

Report.Execute

End Sub

Y te digo que me anda a medias , porque cuando hago doble clic sobre el preupuesto que quiero ver , aveces me lo muestra y otras tengo que volver a hacer doble clic.

Desde ya muchas gracias . y Saludos cordiales.

Solo usa un report.close despues del report.execute para que cierre el reporte y se pueda generar uno nuevo, saludos!!