Comando CurrentDb.Execute UPDATE com erro de chave primaria ou indice duplicado

Pessoal, boa tarde!

Tenho um formulário com sub-formulário onde o sub-formulario é vinculado a tabela Tbl_SFormFrm (Chave primária CodFerr). Pois bem, esse subfomrulário serve para adicionar ferramentas a uma caixa de ferramentas. Todas as vezes que preciso mover ferramentas de uma caixa para outra, eu simplimente uso o comando update e atualizo o Numero da nova caixa. O meu problema acontece quando, após, alterar o Número da caixa de uma dada ferramenta o banco de dados reclama de indice ou chave primária duplicada, no entanto o access realiza a operação modificando o numero da caixa assim como foi definido pelo botao update.

Código:

If caixa <> "CX-999" Then
    Dim flag As Integer
        flag = 1
 End If
 If flag = 1 Then
  If MsgBox("Atenção, registo " & busca & " já esta na caixa: " & caixa & vbCr & vbCr & " Deseja mover?", vbYesNo, "Aviso") = vbYes Then
        
       CurrentDb.Execute "UPDATE [Tbl_SFormFrm] SET [NumCx]= '" & UpCodcx & "' WHERE [CodFerr] = '" & busca & "';"
        
        'Me.Undo

   Else
        Cancel = True
        Me.Undo
        flag = 0
        rsc.Close
        'Set db = Nothing
        Set rsc = Nothing
        Exit Sub
   End If
 Else


Ola;

Se mesmo com a mensagem, faz a alteração, use assim para não devolver a mensagem.

Código:

      On Error Resume Next
      CurrentDb.Execute "UPDATE [Tbl_SFormFrm] SET [NumCx]= '" & UpCodcx & "' WHERE [CodFerr] = '" & Busca & "';"

Sendo que deveria de olhar bem para as relações, se o access reclama, é porque algo não está bem.

Mestre JPAULO, obrigado pela ajuda.

Eu fiz a implementação como sugerido, porém continua com o mesmo problema.

Vou postar o bd para que os mestres do forum possam me ajudar.

Basicamente eu construi as relações do meu bd apenas nas consultas.

O link do db

https://www.dropbox.com/s/r1685uh4w7roi30/BD%20Controle%20de%20Ferramentas_08072018.zip?dl=0

No formulário Form_NCXFrm acessar a combo CAIXA e selecionar a caixa CX-129 para trazer a ferramenta SAP-1051394 (que esta em uma caixa distinta da CX-129 e diferente da CX-999), selecionando no subformulário a combo Cod. Frm na qual irá abrir a lista de ferramentas a ser incluída na caixa. Executada esta movimentação, ira abrir uma MSG box perguntando se quer transferir, clicando em SIM a ferramenta é movida para CX-129, no entanto, quando passo para o próximo registro ou perco o foco do subfomrulario, o ACCESS irá reclamar de índice ou chave duplicada.

tentei enxugar ao máximo o BD para postar sem o link do Dropbox, ainda assim, ficou com mais de 2 MB

O link não está compartilhado.

O Novo link do db

https://www.dropbox.com/s/r1685uh4w7roi30/BD%20Controle%20de%20Ferramentas_08072018.zip?dl=0

No formulário Form_NCXFrm acessar a combo CAIXA e selecionar a caixa CX-129 para trazer a ferramenta SAP-1051394 (que esta em uma caixa distinta da CX-129 e diferente da CX-999), selecionando no subformulário a combo Cod. Frm na qual irá abrir a lista de ferramentas a ser incluída na caixa. Executada esta movimentação, ira abrir uma MSG box perguntando se quer transferir, clicando em SIM a ferramenta é movida para CX-129, no entanto, quando passo para o próximo registro ou perco o foco do subfomrulario, o ACCESS irá reclamar de índice ou chave duplicada.

tentei enxugar ao máximo o BD para postar sem o link do Dropbox, ainda assim, ficou com mais de 2 MB

Nada?