acesso ao banco de dados

Bom dia,

Estou tentando realizar uma inserção de dados em uma banco de dados mdb, e sempre que seleciono o botão new que contem o seguinte código ele me retorna o error '91', se alguém já passou por isso e conseguiu uma solução me ajude.

abaixo segue o código do programa

Public dirdados As String 'caminho do banco de dados
Public ws As Workspace 'espaco de banco de dados

Public db As Database 'nome do banco no programa
Public rsclientes As Recordset 'definindo o name das tabelas no programa

Private Sub cmdanterior_Click()
rsclientes.MovePrevious
End Sub

Private Sub cmdeditar_Click()
rsclientes.Edit
End Sub

Private Sub cmdexcluir_Click()
rsclientes.Delete
End Sub

Private Sub cmdnovo_Click()
    rsclientes.AddNew
    txtcodigo.SetFocus
    cmdnovo.Visible = False
    cmdexcluir.Visible = False
    cmdsalvar.Visible = True
    cmdeditar.Visible = True
End Sub

Private Sub cmdproximo_Click()
rsclientes.MoveNext
End Sub

Private Sub cmdsalvar_Click()
    rsclientes("codigo") = txtcodigo.Text
    rsclientes("nome") = txtnome.Text
    rsclientes("endereco") = txtendereco.Text
    rsclientes("cpf") = txtcpf.Text
    rsclientes("bairro") = txtbairro.Text
    rsclientes("cidade") = txtcidade.Text
    rsclientes("uf") = txtuf.Text
    rsclientes("cep") = txtcep.Text
    rsclientes("telefone") = txttelefone.Text
    rsclientes("celular") = txtcelular.Text
    rsclientes.Update
    cmdnovo.Visible = True
    cmdexcluir.Visible = True
    cmdsalvar.Visible = False
    cmdeditar.Visible = False
End Sub

Private Sub Form_Load()
frmClientes.Width = 12