[Resolvido]Msg (Erro de sintaxe na instrução UPDATE)

Boa tarde,
Sou caloiro neste forum e preciso da ajuda dos mestres, a minha questão é a seguinte:
Tenho um campo (UnitarioActividade) no formulário fmlDetalheActividade com origem do controlo:
=(Nz(([Formulários]![fmlDetalheActividade]![subfmlDetalheActividade].[Formulário]![Texto26]);0))
sendo Texto26 o subtotal no seu subformulário subfmlDetalheActividade
O problema é que quando utilizo o código VBA:
CurrentDb.Execute "UPDATE tblActividade set UnitarioActividade=" & Me.UnitarioActividade & " where CodActividade = " & Me.CodActividade & ";"
para actualizar o campo (UnitarioActividade) na tabela [tblActividade] não vinculada a este formulário, dá a seguinte msg de erro:
Msg (Erro de sintaxe na instrução UPDATE), caso o valor do campo seja decimal se for número inteiro não dá erro, o Tamanho do Campo na tabela [tblActividade] onde é actualizado o registro é: Duplo.

Preciso da vossa ajuda

Obrigado

Ola seja bem vindo ao forum.

Eu já resolvi inumeros tópicos aqui, por causa desse decimal.

Tem sempre de substiuir a virgula por ponto;

Teste por favor;

CurrentDb.Execute "UPDATE tblActividade set UnitarioActividade=" & Replace(Me.UnitarioActividade, ",", ".") & " where CodActividade = " & Me.CodActividade & ";"

Obrigado grande mestre, funcionou na perfeição, e desculpa ter postado, é que estou a 2 dias a tentar encontrar um tópico semelhante e não conseguia.
Mais uma vez obrigado

[Resolvido]

Tranquilo...

Obrigado pelo retorno o forum agradece.