Remplir tableau
Résolu
NgXCherche
Messages postés
18
Date d'inscription
samedi 10 mai 2008
Statut
Membre
Dernière intervention
30 juin 2008
-
9 juin 2008 à 10:14
NgXCherche Messages postés 18 Date d'inscription samedi 10 mai 2008 Statut Membre Dernière intervention 30 juin 2008 - 9 juin 2008 à 17:35
NgXCherche Messages postés 18 Date d'inscription samedi 10 mai 2008 Statut Membre Dernière intervention 30 juin 2008 - 9 juin 2008 à 17:35
3 réponses
jrivet
Messages postés
7392
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
60
9 juin 2008 à 11:31
9 juin 2008 à 11:31
Salut,
Essaie plutot
Dim total As Integer
Dim i As Integer
total = 6
Dim Tableau() As Integer
ReDim Tableau(total - 1)
For i = LBound(Tableau) To UBound(Tableau)
Tableau(i) = i
Next, ----
[code.aspx?ID=41455 By Renfield]
@+: Ju£i€n
Pensez: Réponse acceptée
Essaie plutot
Dim total As Integer
Dim i As Integer
total = 6
Dim Tableau() As Integer
ReDim Tableau(total - 1)
For i = LBound(Tableau) To UBound(Tableau)
Tableau(i) = i
Next, ----
[code.aspx?ID=41455 By Renfield]
@+: Ju£i€n
Pensez: Réponse acceptée
Mikaels35
Messages postés
146
Date d'inscription
dimanche 23 janvier 2005
Statut
Membre
Dernière intervention
17 novembre 2009
2
9 juin 2008 à 11:35
9 juin 2008 à 11:35
Salut
Tu peux faire
Dim Tableau() As Variant
Tableau = Array(0,1,2,3,4,5)
Ou bien
Dim Tableau() As Integer, i As Integer,Total As Integer
Total = 6
ReDim Tableau(Total)
For i = 0 To 5
Tableau(i) = i
Next i
@+
Tu peux faire
Dim Tableau() As Variant
Tableau = Array(0,1,2,3,4,5)
Ou bien
Dim Tableau() As Integer, i As Integer,Total As Integer
Total = 6
ReDim Tableau(Total)
For i = 0 To 5
Tableau(i) = i
Next i
@+
NgXCherche
Messages postés
18
Date d'inscription
samedi 10 mai 2008
Statut
Membre
Dernière intervention
30 juin 2008
9 juin 2008 à 17:35
9 juin 2008 à 17:35
OKi merci bien.
Vous avez la solution les 2 !!
++
Vous avez la solution les 2 !!
++
