Regex pour création tableau valeurs numériques Au secours

Version imprimable

16/08/2020, 04h24
Alex020181

Regex pour création tableau valeurs numériques Au secours

Bonjour,

Cette fois-ci c'est moi qui vient demander de l'aide.

J'ai besoin à partir d'une string contenant des nombres et constituer de n'importe quels caractères d'obtenir un tableau ne contenant que les nombres de cette string.
Je pourrais me débrouiller en parcourant la string avec une boucle et reconstituer les nombres mais je sais que ce ne serait pas propre et que les expressions régulières sont faites pour ça.
La longueur de la string est variable tout comme le nombre de nombres à l'intérieur de celle-ci.

Exemple de string
ma_chaine="aze1rtyu9io/pqsdf555 6#?popo-7 tata"

Je souhaiterais obtenir un tableau comme ceci;
tablo_donnees(0)=1
tablo_donnees(1)=9
tablo_donnees(2)=555
tablo_donnees(3)=6
tablo_donnees(4)=7

Quelqu'un pour me donner un coup de main ?

Merci à vous.

hello,
tu peux faire comme cela par exemple :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
Public Sub ExtraireNombres()
    Dim re As Object, c As Range
    Dim Match, allMatches
    Dim ChaineDeTest As String
    ChaineDeTest = "aze1rtyu9io/pqsdf555 6#?popo-7 tata"
    Set re = CreateObject("VBScript.RegExp")
    re.Pattern = "[\d]+"      ' Le motif est [\d]+ (un ou plusieurs chiffres)
    re.Global = True          ' On recherche toutes les possibilités
    Set allMatches = re.Execute(ChaineDeTest)
    For Each Match In allMatches
        Debug.Print Match
    Next
End Sub

Résultat :

Citation:

1
9
555
6
7

Ami calmant, J.P

16/08/2020, 16h07
Alex020181

Groin merci jurassic pork

Cela fonctionne parfaitement.