bonjour,


Voici le code

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Sub test()
 
Dim nom1 As String
Dim nom2 As String
Dim nom3 As String
Dim nom As String
 
Dim n As Double
 
Dim tabl As Variant
 
nom1 = "sarah"
nom2 = "vianney"
nom3 = "paul"
 
tabl = Array(nom1, nom2, nom3)
 
 
 
For n = 0 To 2
    MsgBox (tabl(n))
Next n
 
End Sub
la priblèmatique est que j'aimerais avoir la possibilité de faire évoluer le tabl en ajoutant ou en enlevant les items..............

comment je fais?????????????,