Access - apertura de recordset

Hola a todos,
Necesito solucionar un problema que tengo al abrir un recordset con Access 2000. No se si está equivocada sintaxis en OpenRecordset o me falta añadir algo.
Me da un error el la linea mitabla.Edit - No se encontró el método o el dato miembro.

Option Compare Database
Option Explicit
Private Sub Comando0_Click()
Dim mibase As Database
Dim mitabla As Recordset
Set mibase = DBEngine.Workspaces(0).Databases(0)
Set mitabla = mibase.OpenRecordset("material", DB_OPEN_TABLE)
mitabla.MoveFirst
Do Until mitabla.EOF
If mitabla!codigo = "1111" Then
mitabla.Edit
mitabla!codigo = "7777"
mitabla.Update
End If
mitabla.MoveNext
Loop
mitabla.Close
End Sub

Gracias por vuestra ayuda.

Option Compare Database
Option Explicit
Private Sub Comando0_Click()
Dim mibase As Database
Dim mitabla As Recordset
Set mibase = CurrentDB
Set mitabla = mibase.OpenRecordset("material", DB_OpenDynaset)
mitabla.MoveFirst
Do Until mitabla.EOF
If mitabla!codigo = "1111" Then
mitabla.Edit
mitabla!codigo = "7777"
mitabla.Update
End If
mitabla.MoveNext
Loop
mitabla.Close
End Sub
CORREGIDO!!!!!