[Resolvidos]Substituir-extrair-converter-trocar numeros-valor numerico de um campo do tipo texto

Olá, gostaria de saber se alguém pode me ajudar, tenho uma tabela com números de agencia, conta corrente, processo, sendo estes campos texto, e eles estão cadastrados com alguns caracteres, por exemplo conta corrente 155.944-3, tentei utilizar a função (val([nome do campo])), ele retorna somente os números, porém quando o campo de origem tem ponto, igual ao exemplo citado, ele retorna com vírgula, exemplo 155,944, e como preciso relacionar este campos com outra tabela onde os campos estão somente como números, não é possível, pois o formato fica diferente.

Estou usando o access 2010, obrigado!!

Boa tarde, koche

Bem-vindo ao fórum
Utilize esta função
Function ExtraiNumero(strValor As String) As Double
'criado por Alexandre Neves
'em 2010-10-05
'para koche
'do fórum MaximoAccess
Dim I As Integer, strProv As String
strProv = ""
For I = 1 To Len(strValor)
If IsNumeric(Mid(strValor, I, 1)) Then strProv = strProv & Mid(strValor, I, 1)
Next
ExtraiNumero = CDbl(strProv)
End Function

Ola seja bem vindo ao fórum;

Numa coluna vazia da sua consulta, teste tambem assim:

Resultado: Substituir(Substituir([NomeDoCampo];".";"");"-";"")

Utilizei esta função substituir na consulta, funcionou perfeitamente, aprendo muito neste forum, muito obrigado!!

Obrigado pelo retorno o forum agradece.

Guarde com carinho a função do Grande Alexandre, um dia poderá fazer-lhe falta.