Comment passer un tableau en argument de fonction
Bonjour à tous,
j'essaye de passer un tableau de variables en argument d'une fonction mais je m'y casse les dents et j'aurais bien eu besoin d'un coup de main:
Voici la fonction :
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
| Sub generationEnsembleVisite(Visites() As String)
Dim nomFeuilleGénérée As String
Dim i As Integer
If Visites.Count = 0 Then
MsgBox (" erreur: Visites.Count = 0")
End If
For i = 1 To Visites.Count
nomFeuilleGénérée = nomFeuilleGénérée + "." + Visites(i) + " !"
' Création de la feuille si elle n'existe pas déjà
créationFeuille (nomFeuilleGénérée)
' Copie des items
For i = 1 To Visites.Count
Call BoucleCopieItem(Visites(i), nomFeuilleGénérée)
Next i
End Sub |
et j'appele ainsi la fonction :
Code:
generationEnsembleVisite (Visites())
Mais ca refuse de tourner sous pretexte qu'il lui faut un index de tableau.
C'est pourtant une procédure classique qui pose 0 soucis en java ou c++, est ce que quelqu'un a une solution?
Merci d'avance
Winnyls