Comment passer en parametre d'une fonction les données d'un type structure
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
Public Type UnIndividu
            Nom As String
            Prenom As String
            Option_Cout As Currency
            Option_Ir As Single
end Type
Public Organisme1(1 To nbLigne) As UnIndividu
Public Organisme2(1 To nbLigne) As UnIndividu
______________________________________________
'remplissage
While Not Resultat.EOF
Organisme1(i).Nom= Resultat("Nom")
.......
Wend
call ecritDansFichierXLS(????) 'je veux passer a ma fonction le contenu implémenté de ma structure.
______________________________________________
Function ecritDansFichierXLS(ByVal MaStructure as?????) as string
Merci de votre aide