[AC-2010] Recherche de chaine numérique dans texte

[vanhalst]

Dans le nom de mes clients j'ai leur N° sur 8 Caractéres que je doit extraire.

3 Exemples :
DE SAVIGNAC 80752702
HOLVAN (FRANCE) (80120050)
VHOLLON (80135742)

Avec vous une idée de solution ?
Merci

[nico84]

Bonjour,

Je ferais une fonction publique (dans un module) qui cherche la 1ere occurrence de 8 chiffres, en gros (code non testé ) :

Code :

1
2
3
4
5
6
public sub extrait(s)
s="?"
for i=1 to len(s)-7
  if isnumeric(mid(s,i,8)) then s=mid(s,i,8): exit sub
next
end sub

Ca risque de ramer mais cette fonction est utilisable dans un select

[antoinev2]

Je partirais plutôt de la fin de la chaîne... pour n'avoir qu'à zapper l'éventuelle parenthèse fermante.