Combobox avec colonne masquée

Troudz · 31 Janvier 2011

Bonjour tout le monde,

Voilà j'ai une petite question concernant les combobox.
J'ai un userform tout bête avec un combobox qui énumère les civilités (Monsieur, Madame...)
Une fois l'userform validé, je ne voudrais reporter dans ma cellule qui l'abréviation de cette civilité (M., Mme...) sans que celle - ci soit visible dans le combobox.
Quelle est la meilleure solution ?
Est il possible de charger les "couples" (Monsieur / M., Madame / Mme) en masquant l'abréaviation ?
Vaut il mieux chercher l'abréviation dans une table en fonction du choix fait par l'utilisateur dans le combo... ?

Je vous remercie d'avance.

MJ13 · 31 Janvier 2011

Re : Combobox avec colonne masquée

Bonjour Troudz

Si tu n'en as pas beaucoup tu peux faire un petit coup de :

Code:

if

GeoTrouvePas · 31 Janvier 2011

Re : Combobox avec colonne masquée

Et le record du code le plus court vient d'être pulvérisé par MJ13 !!!!!!!!!! 😛😛😛

Désolé j'avais juste envie de rigoler là dessus et de te faire un petit coucou au passage MJ13.

Je vous laisse car je ne m'y connais vraiment pas en remplissage de combobox ^^

Bonne journée à vous deux

Pierrot93 · 31 Janvier 2011

Re : Combobox avec colonne masquée

Bonjour à tous,

essaye ceci :

Code:

Private Sub UserForm_Initialize()
With ComboBox1
    .ColumnCount = 2
    .ColumnWidths = "20;0"
    .BoundColumn = 2
    .AddItem "Mr"
    .List(0, 1) = "Monsieur"
    .AddItem "Mme"
    .List(1, 1) = "Madame"
End With
End Sub

ensuite pour renvoyer la valeur de la colonne cachée dans une cellule :

Code:

If ComboBox1.ListIndex <> -1 Then Range("G1").Value = ComboBox1.Value

bon après midi
@+

Combobox avec colonne masquée

Troudz

XLDnaute Occasionnel

MJ13

XLDnaute Barbatruc

GeoTrouvePas

XLDnaute Impliqué

Pierrot93

XLDnaute Barbatruc

Combobox avec colonne masquée

Troudz

XLDnaute Occasionnel

MJ13

XLDnaute Barbatruc

GeoTrouvePas

XLDnaute Impliqué

Pierrot93

XLDnaute Barbatruc

Privacy & Transparency

Privacy & Transparency