Bonjour à tous

Je voudrai affecter une liste de cellule via la fonction array à un type définit par l'utilisateur. Est-ce possible?
J'ai choisi d'utiliser Array car je n'ai pas à faire de boucle pour la saisie des éléments des tableaux cellule et feuille. Les valeurs contenues dans "cellule" et "feuille" sont rentrée manuellement dans l'Array et n'auront pas besoin d'être modifié.

Comment pourrai-je écrire facilement les ligne affectant une liste aux éléments feuille et cellule de mon tableau définit par l'utilisateur?


Mon code:
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
19
20
21
22
Type Local_cell
    feuille(2) As Variant
    cellule(10) As Variant
    parametre As String
End Type
 
 
 
Private Sub CommandButton1_Click()
 
'Déclaration des tableaux
Dim Table_cell() As Local_cell
 
ReDim Table_cell(3)
 
'Initialisation des plages de cellules
Table_cell(0).parametre = "Res"
Table_cell(1).parametre = "paramA"
Table_cell(2).parametre = "paramC"
Table_cell(1).cellule = Array("F25", "F26", "F27", "F28", "F29", "G25", "G26", "G27", "G28", "G29")
Table_cell(2).cellule = Array("H25", "H26", "H27", "H28", "H29", "F25", "F26", "F27", "F28", "F29")
End Sub