IenchGaleu
XLDnaute Nouveau
Bonjour à tous!
Je suis débutant en VBA et Excel, et donc j'ai besoin de votre aide.
Je souhaite créer un tableau "ListInfo(9)" dans une fonction1 et le passer par référence à fonction2 "InitListInfo" pour remplir le tableau par référence. Mon problème est que même grâce à ce site (Utiliser les variables tableaux en VBA Excel), je n'arrive pas à gérer correctement le transfère.
Voici le code en question.
Vous l'aurez compris, mon but est de récupérer le tableau dans ListeFichier pour pouvoir l'utiliser par la suite.
Merci d'avance pour votre aide, et n'hésitez pas à me conseiller sur mon code.^^
Je suis débutant en VBA et Excel, et donc j'ai besoin de votre aide.
Je souhaite créer un tableau "ListInfo(9)" dans une fonction1 et le passer par référence à fonction2 "InitListInfo" pour remplir le tableau par référence. Mon problème est que même grâce à ce site (Utiliser les variables tableaux en VBA Excel), je n'arrive pas à gérer correctement le transfère.
Voici le code en question.
Code:
Function InitListInfo(ByRef ListInfo() As String) As String
Dim resultat As String
ListInfo(1) = prenom
ListInfo(2) = nom
ListInfo(3) = titre
ListInfo(4) = fonction
ListInfo(5) = organisme
ListInfo(6) = ville
ListInfo(7) = departement
ListInfo(8) = categorie1
ListInfo(9) = categorie2
resultat = ListInfo
InitListInfo = resultat
End Function
Code:
Sub ListeFichier()
Dim ListInfo(9) As String
Dim i As Integer
i = 1
MsgBox InitListInfo(ListInfo)
'Do
'MsgBox ListInfo(i)
'i = i + 1
'If i = 10 Then Exit Do
'Loop
End Sub
Vous l'aurez compris, mon but est de récupérer le tableau dans ListeFichier pour pouvoir l'utiliser par la suite.
Merci d'avance pour votre aide, et n'hésitez pas à me conseiller sur mon code.^^