Autres XL2007 Récupérer dans un tableau avec SPLIT

[erics83]

Bonjour,

Je souhaite mettre récupérer dans un tableau des données séparées par un "|". Mon code "initial" (=celui qui "stocke" en r():

For i = 1 To Feuil1.Range("A" & Rows.Count).End(xlUp).Row * 2
    For j = i + 1 To Feuil1.Range("A" & Rows.Count).End(xlUp).Row * 2
        For k = j + 1 To Feuil1.Range("A" & Rows.Count).End(xlUp).Row * 2
            If (Abs(a(i)) <> Abs(a(j)) And Abs(a(i)) <> Abs(a(k)) And Abs(a(j)) <> Abs(a(k))) Then
            n = n + 1
            r(n) = a(i) & "|" & a(j) & "|" & a(k)
            End If
        Next k
    Next j
Next i
'.................................................
'Différents calculs et autres..................
'..................................

et je souhaiterai récupérer dans un Tblo, les valeurs en utilisant SPLIT, j'ai donc essayé :

For i = 1 To n
    Tblo = Split(r(i), "|")
Next i
' mais je ne récupère que les valeurs tblo de i...

après j'ai fait :

ReDim tblo(n, 1)
For i = 1 To n
    tblo(i, 1) = Split(r(i), "|")
Next i
'mais mes valeurs Tblo s'inscrivent en format : Tblo(n,1)(0)

, en fait j'aimerai avoir/récupérer les valeurs en format

Admettons que r(1) = "1|2" j'aimerai que Tblo(n,1)  =  1 et Tblo(n,2)=2
de même si r(2)="5|" j'aimerai que Tblo(n,1)  =  5
et si r(3) = "6|7|8" j'aimerai que Tblo(n,1)  =  6 et Tblo(n,2)=7 et Tblo(n,3)=8

, donc que le tblo prenne la "taille" suivant le nombre de variables entre 2 "|"...

merci pour votre aide,

 

[danielco]

Bonjour,

Voici le fonctionnement de Split :

Sub test()
  Dim R As String, Tblo, I
  R = "a|b"
  Tblo = Split(R, "|")
  For I = 0 To UBound(Tblo)
    Debug.Print Tblo(I)
  Next I
End Sub

Tu récupères :

Cordialement.

Daniel

 

[erics83]

Merci Daniel,

merci pour ce rappel de la fonction SPLIT, j'avais déjà trouvé le fonctionnement grace au supers tutos de Silkyroad. Mon problème est qu'il y a une boucle ..un peu comme si ton "R" était modifié à chaque fois...et donc le format de Tblo change et je souhaite récupérer les Tblo(n,1), etc....

merci pour ton aide,

 

[danielco]

Mais, normalement, ça foncttionne quel que soit le nombre de "|" dans la chaîne de caractères.

Daniel

 

[erics83]

Merci Daniel, oui "ça fonctionne" sans problème...c'est le Tblo et le format du tableau qui me pose problème....

 

[danielco]

Je ne comprends pas ce qui te gênes ? Split crée un tableau à simple entrée contenant la chaîne découpée en tronçons. Il suffit d'une boucle pour exploiter le tableau obtenu ?

Daniel

 

[erics83]

Ok, merci Daniel,

c'est surtout que je voulais que mes Tblo aient tous le "même" format..et j'ai résolu mon problème en rajoutant des "|" lorsque j'avais que 1 ou 2 variables....

merci pour ton aide qui m'a permis de re-travailler mon raisonnement,

A+