Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

tableau dyn dans une variable???

  • Initiateur de la discussion Syd
  • Date de début
S

Syd

Guest
boujour tout le monde,

Est-ce qq'un pourait me dire comment integrer un tableau de valeurs ds une variable.

Voici Mon code :

Option Explicit
Public vaVariable As Variant
Dim vatableau() As Variant
Dim Compteur as Integer

'Quand on clic sur le bouton "Nombre OK" on incremente le tableau et on lui ajoute des valeurs

Private Sub bnGroupeNROK_Click()
ReDim Preserve vatableau(0 To Compteur)
vatableau(Compteur) = txBox.Value
Compteur = Compteur + 1

'Une foi le tableau "vatableau" rempli, voici mes tentatives pour integer les valeurs du tableau ds la variable "vaVariable" :

'1ere tentative :
vaVariable = vatableau()

'2eme tentative :
For i = 0 To Compteur
ReDim Preserve vaVariable (0 To Compteur)
vaVariable (i) = vatableau(i) 'avec i declaré en Integer
ReDim Preserve vaVariable (0 To Compteur)
vaNbAnx(i) = NbAnxDesGrpes(i)

Next i

End Sub

---> j'ai comme erreur : incompatibilite de type oubien l'indice ne correspond pas à la selection ....

Merci d'Avance.
 
J

jaccard

Guest
Hello,

vaVariable = vatableau

et pour parcourir l'un ou l'autre :

For Each strItem In vaVariable
Debug.Print strItem
Next strItem

ou

For intIndex = 0 To UBound(vaVariable)
Debug.Print vaVariable(intIndex)
Next intIndex


dom ;-)
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…