Mémoriser valeur combobox

Résolu/Fermé
zdexter Messages postés 27 Date d'inscription dimanche 26 août 2012 Statut Membre Dernière intervention 5 février 2013 - 25 sept. 2012 à 16:56
zdexter Messages postés 27 Date d'inscription dimanche 26 août 2012 Statut Membre Dernière intervention 5 février 2013 - 26 sept. 2012 à 10:15
Bonjour,

Je vous explique mon problème en qqles mots,
Je souhaite appeler un userform contenant des combobox, tout remplir bien comme il faut et ensuite qd je rappelle ce userform que les valeurs proposées par défaut soient celles que j'ai choisies précédemment.

Le userforme fonctionne très bien je n'ai plus que cette fonction rappel à développer, et je pensais pour se faire utiliser la fonction defaultValue et selectionner en valeur par défaut la case qui vient être remplie par tel ou tel combobox.

Biensur pour simplifier le nom de la page est généré automatiquement donc je travaille dans activesheet

Donc voila en résumer j'aimerais savoir comment faire pour écrire ce que je veux faire Cb1.Defaultvalue=Activesheet.Cell(5,11)


2 réponses

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 702
25 sept. 2012 à 17:36
Bonjour,

Principe a utiliser: a adapter avec vos noms et cellules

'A chaque changement de valeur
Private Sub ComboBox1_Change()
  Range("A6") = ComboBox1.Text
End Sub

'A l'ouverture de l'UF
Private Sub UserForm_Initialize()
  ComboBox1 = Range("A6")
End Sub
0
zdexter Messages postés 27 Date d'inscription dimanche 26 août 2012 Statut Membre Dernière intervention 5 février 2013
26 sept. 2012 à 10:15
J'ai trouvé, en fait au lieu de faire un

"Unload me"

pour terminer le userform il suffit de faire un

"me.hide"


Btw, j'avais déjà essayé le comboBox1 = Range("A6") et j'obtenais une erreur du type
erreur d'execution 380,
Impossible de définir la propriété Value. Valeur de propriété non valide.
Merci qd mm :)
0