Discussion :

[GevConstruc]

Bonjour tout le monde!



Je n'arrive pas à récupérer une ancienne valeur d'un combobox. Je m'explique :

1) Dans un premier temps, l'utilisateur accède à un Userform à l'aide d'une macro.
2) Ensuite, celui-ci opére un choix dans la combobox en question
3) j'enregistre son choix dans une cellule (feuille 7 , ligne variable et colonne 5 (= E))

Si l'utilisateur le souhaite, il peut réactiver l'userform pour modifier son choix.
Lors de la réouverture, je souhaite récupérer ses choix précédents pour éviter de tout retaper.

Pour cela, je souhaite, que, quand l'Userform s'ouvre, les combobox soient activés sur l'items précédemment choisis par l'utilisateur

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
 
 
Private Sub UserForm_Initialize()
 
          UserForm13.Controls("combobox" & Numcbx).List = Array("Zone 1", "Zone 2") ' ok fonctionne
 
 
For Ligstring = 48 To 57
 
    ' ... Code précédent
 
    If Feuil7.Cells(Ligstring, 5) = "" Then
        UserForm13.Controls("combobox" & Numcbx).ListIndex = -1
    ElseIf Feuil7.Cells(Ligstring, 5) = "Zone 1" Then
        UserForm13.Controls("combobox" & Numcbx).ListIndex = 0
    ElseIf Feuil7.Cells(Ligstring, 5) = "Zone 2" Then
        UserForm13.Controls("combobox" & Numcbx).SetcurrentIndex (2)
    End If
 
    Numcbx = Numcbx + 1
 
   ' ... Code suite
 
Next Ligstring
 
End sub

J'ai déjà essayé différents trucs trouvé sur le forum mais ça ne marche pas :

=> .SelectedItem
=> .ListIndex
=> SetCurrrentIndex (2)
=> ...


Merci d'avance

GevConstruC

[ARTURO83]

Bonjour,

Les valeurs étant enregistrées dans des cellules, à la réouverture du UserForm, chargez les valeurs des cellules dans les contrôles. Exemple:

ComboBox1.Text = [A10]

Cdlt

[unparia]

Bonjour
1)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

j'enregistre son choix dans une cellule (feuille 7 , ligne variable et colonne 5 (= E))

Et comment sais-tu quel rang a cette "ligne variable" dans laquelle tu as "sauvegardé" le choix fait précédemment ? Précise cet aspect
2) utilise l'évènement Activate et non Initialize
3) de quel chapeau magique sors-tu le membre SetcurrentIndex d'une combobox VBA/Excel ?