Discussion :

[Daejung]

Bonjour,

J'ai voulu mettre dans une chaîne texte tout un ensemble de valeurs sous la forme "EXEMPLE1","EXEMPLE2","EXEMPLE3","EXEMPLE4",...., "EXEMPLE1xxx", pensant pouvoir utiliser ensuite le résultat contenu dans la variable (Varaible1)par

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Variable2= Array (Variable1)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
    For i = LBound(Variable2) To UBound(Variable2)
       ......
    Next i

mais UBound(Variable2) ne retourne que 1 et Variable2 (1) par exemple, retourne la totalité de la chaîne et pas EXEMPLE1

Je ne comprends pas pourquoi

Merci pour votre aide

[Minick]

Salut,

Il faut eclater ta chaine pour avoir un tableau en entree pour Ubound.

Un exemple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Sub Test()
    Dim Variable1 As String, Variable2() As String
    Dim i as Interger
 
    Variable1 = "EXEMPLE1,EXEMPLE2,EXEMPLE3,EXEMPLE4,EXEMPLE5"
    Variable2 = Split(Variable1, ",")
 
    For i = 0 To UBound(Variable2)
    '...
    Next
End Sub

[Daejung]

Ok Merci !