Fonction split, avis sur le code

Bonjour,

je souhaite découper des chaines de caractères avec la fonction split.

Je me demande si cette facon d'écrire le code est bonne. En faite je voudrais savoir si je dois mettre toutes les chaines de caractères entre deux guillemets ou mettre des guillemets pour chaque chaine comme dans mon code si dessous et les séparer avec --> ;
Si je mets l'ensemble dans des guillemets, est ce que --> ; c'est génant ?

Code:

---

1 2 3 4 5 6

Dim st As String Dim arrPartiesControle() As String   st = "chk_75_KO";"chk_75_OK";"chk_75_IDOC";"chk_75_IFI";"chk_76_KO";"chk_76_OK";...etc...   arrPartiesControle() = Split (st, "_")

---

arrPartiesControle(0) -> "chk"
arrPartiesControle(1) -> "75" (Id Libellé)
arrPartiesControle(2) -> "KO" (Colonne)


Merci pour votre aide !!! ;)

Bonjour,
vois si ceci te convient mieux

Code:

---

1 2 3 4 5 6 7 8

Dim st As String Dim i As Integer Dim arrPartiesControle() As String st = "chk_75_KO;chk_75_OK;chk_75_IDOC" arrPartiesControle = Split(st, ";") For i = 0 To UBound(arrPartiesControle) Debug.Print arrPartiesControle(i) Next i

---

Merci ;) toujours là pour m'aider, vraiment qsympa !!

Par contre je ne comprend pas trop le code en faite...

Tu as mis comme séparateur ";" . Sachant que je veux séparer les chaines "chk", "75" et "ok" et que le séparateur est : _ comment ce code s'y prend t-il.

pourrais -tu juste m'expliquer comment il fonctionne ( J'apprend un peu plus comme cela...)

merci ! :)

Salut,
tu peux utiliser le separateur que tu veux.
Un exemple d'utilisation de la fonction Split sur plusieurs niveaux est donne dans le tutoriel suivant :
http://jpcheck.developpez.com/tutori...tres/#LXII-E-2

Pour des raisons de facilite, le caractere que j'emploie le plus souvent est le caractere | (se prononce "paillepeu" :aie:), car il est quasiment jamais utiliser dans les chaines de caracteres :ccool:

Ok donc si je dois utliser le "_" mais il n'y aura pas de souci avec le ";", ce que je me demande c'est que si mon séparateur est "_" le point virgule ne posera pas de problème pour differencier 2 chaine de caractere.

donc le code serait :

Code:

---

1 2 3 4 5 6 7 8

Dim st As String Dim i As Integer Dim arrPartiesControle() As String st = "chk_75_KO;chk_75_OK;chk_75_IDOC" arrPartiesControle = Split(st, "_") For i = 0 To UBound(arrPartiesControle) Debug.Print arrPartiesControle(i) Next i

---

mais il faut que j'integre ca dans le code

arrPartiesControle(0) -> "chk"
arrPartiesControle(1) -> "75"
arrPartiesControle(2) -> "KO"

En gros j'suis nul en VBA, je manque de logique...

En fait, tu dois d'abord decomposer les elements avec le separateur ";"
puis tu appliques le separateur "_"

ca te donnera donc

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Dim st As String Dim i As Integer, j As Integer Dim arrPartiesControle As Variant Dim arrPartiesControle2 As Variant st = "chk_75_KO;chk_75_OK;chk_75_IDOC" arrPartiesControle = Split(st, ";") For i = 0 To UBound(arrPartiesControle) arrPartiesControle2 = Split(arrPartiesControle(i), "_") For j = 0 to UBound(arrPartiesControle2) Debug.Print arrPartiesControle2(j) Next j Next i

---

Merci infiniment !!!!! :ccool:

Ok je comprend mieux et je me rend mieux compte comment le code se déroule ;)

bonne continuation ;) :) :)