Expressão com problemas (números inteiros e fracionados)

Ola pessoal, meu problema é o seguinte, preciso jogar determina valor de um formulario para outro. Para isso estou usando a seguinte expressão:

CurrentDb.Execute "INSERT INTO [Produtos das vendas] ([QUANT],[LOTE], VINCULO) VALUES (" & QUANT & "," & Me.LOTE & ", " & [Forms]![NOTAS DE VENDAS]![Código] & ")"

Ela funciona bem quando o valor a ser transportado é de numeros inteiros, mas se for quebrados q tiver que por virgula trava.
O  mesmo acontece com letras, na quantidade só usarei numeros, claro, mas se for quebrado não vai e no caso dos lotes tbem, se só uso numeros funciona beleza se uso alguma letra no lote ja era.
Alguem tem alguma ideia de como fazer?

Obrigado dilson, a questão do lote funcionou beleza, só a da quantidade que não consegui, eu teria q incluir a função na msm linha de expressão ou em ma nova? teria como colocar um exemplo, por favor, eu n sou muito bom em vba

Coloquei desta forma mas não funcionou:

CurrentDb.Execute "INSERT INTO [Produtos das vendas] ([QUANT], [LOTE], VINCULO) VALUES (" & CDbl(QUANT) & ", '" & Me.LOTE & "', " & [Forms]![NOTAS DE VENDAS]![Código] & ")"

nas tabelas tambem configurei para numero, fixo, duplo, 2 casas dec.