Bonjour,
voici mon problème, j'ai créé un formulaire avec une liste déroulante (qui prend sa source depuis un fichier excel). J'aimerai que lorsque l'on click sur un bouton, un label soit créé dans mon formulaire avec comme texte la valeur que l'utilisateur a choisis dans la liste déroulante (ou plus simplement je pense une seconde liste déroulante avec toutes les valeurs sélectionnées).
Ni arrivant pas, j'ai actuellement stocker dans un tableau toutes les valeurs que l'utilisateur à choisis dans la liste déroulante afin de créer une boucle plus facilement en ayant des variables dynamiques.



Voici 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
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
Dim i1 As Long
Dim i As Integer, j As Integer
Dim Tableau() As String
Option Explicit
 
Private Sub bt_ajouter_Click()
 
    If i1 = 0 Then
 
        'Définit le type de données pour le tableau.
        'Dim i As Integer, j As Integer
 
        'Définit la taille du tableau
        i = 30
        ReDim Tableau(i)
 
        'Alimente les éléments du tableau
        j = 0
        Tableau(j) = Me.zl_article.Value
        j = j + 1
 
        'Boucle sur les éléments du tableau
        For j = 0 To i1
            MsgBox Tableau(j)
        Next j
        i1 = i1 + 1
    Else:
        Tableau(j) = Me.zl_article.Value
        j = j + 1
 
        'Boucle sur les éléments du tableau
        For j = 0 To i1
            MsgBox Tableau(j)
        Next j
        i1 = i1 + 1
    End If
End Sub
Donc est-il possible de masquer dans la liste déroulante les valeurs qui ont déjà été sélectionnées, sans les supprimer du fichiers excel ?
Et de créer une liste déroulante ou des labels à partir des valeurs contenues dans un tableau ?

Merci de votre aide !

Personne ?