[Resolvido]Alterar Campo em tabela

Bom dia
Queria alterar os dados na tabela
http://dl.dropbox.com/u/8169944/Alterar%20Campo%20de%20Tabela.mdb

Obrigado

If MsgBox("Alterar a Linha dos Produto ? " & Chr(10) + NovaLinha & Chr(10) & "Para a Linha " & NovaLinha & Chr(10), vbYesNo + vbQuestion, "Aviso") = vbYes Then
DoCmd.SetWarnings False
DoCmd.RunSQL "UPDATE Linha Set [Linha].[Linha] = '" & Me.NovaLinha & "' WHERE [Linha].[Linha] = '" & Me.Linha & "'"
DoCmd.SetWarnings True
MsgBox " Linha Alterada com Sucesso !", vbCritical, "Aviso"

reveja o seu projeto, tem o nome Linha no nome da tabela, no nome do campo e no nome do campo do formulario, e se não me engano já lhe disseram isso aqui mesmo, vai ter muitos problemas de futuro.

Obrigado Ricardo

Funciona perfeito.