Retornar valor ao perder foco

Bom dia a todos.
Tenho um formulário onde eu gero uma ordem.
No formulário tem um campo chamado "ID_Registro de Horário"
O valor dititado tem que ir p uma tabela chamada "comando_c" no campo "codquebra_c" ao perder o foco, mas somente ao perder o foco.

ai eu fiz o código:

Private Sub ID_Registro_de_Horário_Exit(Cancel As Integer)

Dim Intcodquebra As Integer
DoCmd.RunCommand acCmdSaveRecord
Intcodquebra = DLookup("CódigoEWO", "Registros horários", "CódigoEWO='" & Me.CódigoEWO & "'")
CurrentDb.Execute "UPDATE comando_c Set [comando_c].[codquebra_c] = " & Intcodquebra

End Sub

e ta dando erro, o erra tá em anexo...

Olá Max, tem algo errado nesse db.execute não tem? essa é uma linguagem SQL? se for usar UPDATE em SQL use assim:

db.execute "UPDATE Campo1, Campo2 SET '" & me.campo1 & "', '" & me.campo2 & "' FROM Tabela1"
db.execute "INSERT INTO (Campo1, Campo2) VALUES ('" & me.campo1 & "', '" & me.campo2 & "'") FROM Tabela1"
db.execute "DELETE Campo1, Campo2 FROM Tabela1 WHERE ID = '" & me.ID & "'"

Só revise o Delete que talvez eu esteja errado... qualquer dúvida só perguntar abraços!

Eu sou fraco em linguagens de programação

db.execute "UPDATE Campo1, Campo2 SET '" & me.campo1 & "', '" & me.campo2 & "' FROM Tabela1"
db.execute "INSERT INTO (Campo1, Campo2) VALUES ('" & me.campo1 & "', '" & me.campo2 & "'") FROM Tabela1"
db.execute "DELETE Campo1, Campo2 FROM Tabela1 WHERE ID = '" & me.ID & "'"

Campo1, Campo2, (campo1 é o que eu quero copiar e o campo2 é o que eu quero que seja atualizado com o valor copiado?)

na verdade campo1 e 2 é para você selecionar 2 campos da tabela que você queira atualizar, para você copiar a informação é o SET então você usaria o me.nomedocampo que é o local que gostaria de copiar a informação entendeu?

vou detalhar melhor

"UPDATE Nomedocampodatabela1 SET Nomedocampodatabela1 = '" & Nome_do_campo_do_formulário_que_deseja_copiar & "' FROM Nomedatabela"

Então no meu caso eu tenho uma tabela chamada Fornecedor um nome do campo da tabela como Cliente e no formulário como Razão Social então eu usaria este código:
db.execute "UPDATE Cliente SET Cliente = '" & me.Razaosocial & "' FROM Fornecedor "
(Tabela = Fornecedor)
(Campo da Tabela = Cliente)
(Campo do formulário = Razaosocial) é o que deseja copiar!

Tenta ai!