[Resolvido]Consulta VBA x Atualizar com campo do formulário

Boa tarde

Em um formulário desvinculado, possuo um campo texto (Alfanumérico), de 4 posições, chamado txtCodigo. Preciso fazer um update em um determinado campo da uma tabela usando como parâmetro o txtCodigo. Estou usando o código abaixo:

CurrentDb.Execute "UPDATE tb_Sped SET tb_Sped.CodEmp = " & Me.txtCodigo & ";"

Este código funciona, porém, se no campo txtCódigo, eu informar 0001, o campo da tabela CodEmp grava apenas o 1, não gravando o 0001. Alguém tem alguma dica de como posso fazê-lo?

Att. Vinicius

Olá, coleque no formato do referido em sua tavela "0000" sem as aspas

Boa tarde Beto,

Obrigado,

Mas acabou não dando certo, continua gravando o 1 ao invés de 0001.

Att. Vinicius

Beto,

Boa tarde,

Muito obrigado pela dica, consegui resolver com a linha:

CurrentDb.Execute "UPDATE tb_Sped SET CodEmp ='" & Me.txtCodigo & "';"

e a sua dica.

Att. Vinicius

então o formato do campo em questão é texto e não número, pois fiz o teste aqui com formato número e funcionou certinho colocando no formato da tabela.