Separar Texto de número

Prezados,

Boa tarde!

Preciso de uma formula para o Access que separe o número do texto, sendo que
o número não segue um ordem dentro do texto, por exemplo:

Assunto: Verificar o documento 9456789456 urgente cod 630 - preciso separar o número 945678456
ou

Assunto: Proposta 565879321 cidade de São Paulo Cod 60 - preciso separar o número 565879321


O objetivo é separar do texto os número que contém 9 caracteres, isso é possível ?


Obrigado

Parte do que precisa:
Extrai somente os Números!

Porem, como vc postou, pode ocorrer de vir vários Números desnecessários nesse texto. Então fica complicado amigo... muito mesmo pois não ha padrão algum...

Crie um Modulo Com esse Conteúdo:

Código:

Public Function SoNumero(Text As String) As String
    Dim i As Integer, j As String
    For i = 1 To Len(Text)
        If Asc(Mid(Text, i, 1)) < 48 Or _
          Asc(Mid(Text, i, 1)) > 57 Then
        Else
            j = j & Mid(Text, i, 1)
        End If
        SoNumero = j
    Next
End Function


Agora chame a função em uma consulta por Exemplo assim:
Em um Campo Novo da consulta coloque:
SoNumero([NomeCampoComTexto])


Lhe retornará nesse Campo somente o que for Numero.
945678456630

56587932160




Fonte:vbweb.com.br/forum_resp.asp?Forum=VB&Codigo=221385

Amigos,

Agradeço ajuda, sou iniciante nesta parte de programação.


Para as 2 respostas aparece a seguinte mensagem:

Função 'xxxxxxx' indefinida na expressão.

Poderiam me enviar o arquivo ? anisioestevao@terra.com.br