Sí, me olvidé de decir que eso lo intenté, me quedó así:
Código:
Public Sub CerrarRS(RS As Recordset)
If RS.State = 1 Then
RS.Close
Set RS = Nothing
End If
End Sub
Pero sigue tirándome el error. Lo que más bronca me da es que antes me funcionaba de 10... otra cosa que me dijeron que intente era abrirlo de esta manera
Código:
DE.Connection1.Execute "Select * from Pacientes"
Pero en un lugar me funciona y en otro no. La verdad que me tiene desconcertada ese error, porque el Recordset se cierra bien, y cuando lo quiero abrir me dice eso! También probé sacando el Open pero después me dice que el objeto está cerrado, así que el cierre lo hace bien!