bonsoir,
je ne sais si je suis assez clair dans mon titre,
je voudrais après avoir récupérer les informations dans une form stockées dans un tableau pouvoir faire le chemin inverse lorsque je selectionne la une ligne du tableau.
Est-ce-que c'est possible et comment je dois procéder svp?
Merci d'avance
voici mon code pour récuperer les infos :
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 Sub Ajout() Dim i As Integer If nb > UBound(t) Then ReDim Preserve t(UBound(t) + 3) t(nb).civ = FrmPays.LblCiv.Text t(nb).nom = FrmPays.Lblnom.Text t(nb).prenom = FrmPays.Lblpre.Text t(nb).cpays = FrmPays.Lblpays.Text ReDim t(nb).Tp(5) 'fabrication des 6 petits booleens Dim x As CheckBox For i = 0 To 5 x = FrmPays.Pnlpays.Controls(i) t(nb).Tp(i) = x.Checked ' la case à cocher est dans le même etat que dans le tableau Next nb += 1 End Sub
Partager