APROVEITE, MELHORE OU COMENTE
pq não usa o cDbl(?) ?
valor = cdbl("1.200,50")
e pronto...
boiei no problema
valor = cdbl("1.200,50")
e pronto...
boiei no problema
Citação:LIONHEART escreveu:
pq não usa o cDbl(?) ?
valor = cdbl([Ãâ€ÂÂ]1.200,50[Ãâ€ÂÂ])
e pronto...
boiei no problema
[S57] Quem boiou fui eu. NUNCA imaginei que o CDBL pudesse tratar a formatação de modo diferente do VAL.
Essa é a resposta correta.
Vivendo e aprendendo!
Obrigado, VALEU! [S67]
P.S. - Desculpem a vergonha que passei...
Pra quem usa access o dia inteiro (como eu) a função NZ é extremamente necessária e por isso eu fiz um sinà 'nimo dela para ASP (e que obviamente funciona para VBA) que me atende 100%
Public Function NZ(sTextToConvert)
if isnull(sTextToConvert) then
NZ = 0
exit function
end if
if isempty(sTextToConvert) then
NZ = 0
exit function
end if
if not isnull(sTextToConvert) and not(isempty(sTextToConvert)) then
sTextToConvert = replace(sTextToConvert, " ", "")
if isnumeric(sTextToConvert) then
NZ = sTextToConvert
else
NZ = 0
end if
else
NZ = 0
end if
end Function
Tópico encerrado , respostas não são mais permitidas