Access - recorset error

tengo el siguiente codigo

Dim dbactual As Database
Dim addexperiencia As Recordset

Set dbactual = CurrentDb
Set addexperiencia = dbactual.OpenRecordset("Diari", dbOpenDynaset)

addexperiencia.Close

y me da el error 13 (no coinciden los tipos en la linea Set addexperiencia = dbactual.Open...)

porque?

gracias!

Hola
La expresión que escribes es correcta.
Debes especificar un poco acerca de que Versión de Acces estas usando.

Ese error se presenta cuando trabajas en Access2000.
Busca en las referencias (Dentro de un modulo el menu herramientas/referencias), quita la referencia a ADO y coloca la de DAO.