[Resolvido]Erro na exclusão de itens

Caros amigos,
Criei um botão excluir e fiz o seguinte codigo:

If IsNull(Me.código) Then

MsgBox "Não há registro a ser excluído!", vbCritical, "Excluir!"
Exit Sub
ElseIf MsgBox("Tem certeza que quer excluir o registro?", vbYesNo + vbQuestion, "Excluir!") = vbYes Then

CurrentDb.Execute "DELETE * FROM Nome da tabela WHERE código=" & Me.código & ""

DoCmd.RunCommand acCmdRefreshPage

MsgBox "Resgistro excluído com sucesso!", vbInformation, "Excluir!"
Else
End If
end sub

Este comando faz tudo certinho, porem quando vou verificar no registro do formulario esta dando um erro conforme a imagem

Alguem poderia me ajudar?

Olá Noberto

Na realidade acho que preciso de um comando para atualizar, porque ele funciona direitinho com o codigo que me passou, so que para excluir totalmente do formulario, preciso sair do formulario e entrar novamente. Voce sabe algum comando para atualizado após a exclusão?

Certinho muito obrigado mais uma vez