Résultats de 1 à 3 sur 3

Sujet : Perte tableau par appel procédure

  1. #1
    Membre MP
    Inscrit
    août 2013
    Messages
    8

    Perte tableau par appel procédure

    Salut à tous,

    J\'ai un petit problème dans VB pour PowerPoint.

    Je remplis un tableau dans une 1ère procédure et je passe ensuite ce tableau en paramètre pour récupérer ses valeurs ds une 2ème procédure.
    Toutes les valeurs semblent être perdues !

    Voici un extrait de mon code :

    <<
    Option Base 0

    Public lib_all() As Variant
    Public tab_lib() As Variant

    Sub Fill_Tab()

    Open file For Input As #1

    i = 0
    ReDim lib_all(i)

    Do While Not EOF(1)
    Line Input #1, tmp
    mytab = Split(tmp, Chr(9))

    lib_all(i) = mytab(1)
    i = i + 1
    ReDim Preserve lib_all(i)

    Loop
    Close #1

    Call Use_Tab(lib_all())

    Erase lib_all
    End Sub

    Sub Use_Tab(ParamArray tab_lib() As Variant)

    Debug.Print LBound(tab_lib)
    Debug.Print UBound(tab_lib)

    End Sub

    >>

    Le résultat est 0 pour les 2 limites de mon tableau.

    L\'un d\'entre-vous voit-il qqchose de louche ds mon code ?

    Merci d\'avance :wink:

  2. #2
    Membre MP
    Inscrit
    août 2013
    Messages
    1
    What you have is correct, but a bit confusing. Because you are passing but one parameter you can leave out \'paramarray\':

    Sub Use_Tab(tab_lib() As Variant)
    ....

  3. #3
    Membre MP
    Inscrit
    août 2013
    Messages
    8
    I\'ve just tested it and it works fine !

    Many thanks G.L. ! :P:

Informations du sujet

Utilisateur(s) parcourant ce sujet

il y a actuellement 1 utilisateur(s) parcourant ce sujet. (0 membre(s) et 1 visiteur(s))

Règles des messages

  • Vous ne pouvez pas créer de sujets
  • Vous ne pouvez pas répondre aux sujets
  • Vous ne pouvez pas importer de fichiers joints
  • Vous ne pouvez pas éditer vos messages
  •  
  • Les BB codes sont Activés
  • Les Smileys sont Activés
  • Le BB code [IMG] est Activé
  • Le code [VIDEO] est Activé
  • Le code HTML est Désactivé