Erro na numeração automática através do formulário

Bom dia pessoal,

Itenção: Abrir o formulário com uma numeração automática, encontrando o maior valor registrado somando +1.

Erro: Erro em tempo de execução '-2147352567 (800200009)': Você não pode atribuir um valor a este objeto.

Código utilizado:

Código:

Private Sub Form_Open(Cancel As Integer)
             Me.Id_Mnt = (Nz(DMax("Id_Mnt", "tb_Mnt"), 0) + 1)
          End Sub


A mensagem de erro só é dada quando vinculo o campo "Id_Mnt" do formulário [frm_Mnt], quando desvinculo ele a alguma fonte de controle a mensagem é exibida.

na [tb_Mnt] o campo "Id_Mnt" é Chave Primária do tipo Número, inteiro, Idexado (duplicação não autorizada).

Desde já agradeço.

anexa essa parte do banco de dados amigo, mais fácil para analisar

Lucas, porque você não deixa esse campo como numeração automática?

Não utilizo pois após excluir um número cadastro de maior númeração ele não retorna disponível e sim pula para o próximo.

Retire a expressão do evento "Ao abrir" do formulário e utilize a expressão na propriedade "Valor padrão" do controle "Id_Mnt".