VBA ajouter 2 lignes au dessus des éléments listés dans la combobox

fb62840 · 16 Janvier 2013

Bonjour à toutes et à tous,

J'aimerais réussir à ajouter 2 lignes au dessus des éléments listés dans une combobox.
Je parviens à les ajouter mais ils se placent tout en bas de la liste alors que je les voudrais en haut de liste.

La combobox est alimentée ainsi :

Code:

CB_metier_cible.List = [métiers].Columns(1).Value

Merci pour vos conseils et pour votre aide.

Robert · 16 Janvier 2013

Re : VBA ajouter 2 lignes au dessus des éléments listés dans la combobox

Bonjour Fb, bonjour le forum,

peut-être comme ça :

Code:

Me.ComboBox1.AddItem Range("A1").Value, 0
Me.ComboBox1.AddItem Range("A2").Value, 1

Voir le fichier exemple en pièce jointe :
Clique sur le bouton USerForm. Dans la boîte de dialogue Ajout de données ouvre la ComboBox. Clique sur le bouton Ajouter et ouvre à nouveau la Combobox...

fb62840 · 16 Janvier 2013

Re : VBA ajouter 2 lignes au dessus des éléments listés dans la combobox

Robert à dit:
Bonjour Fb, bonjour le forum,

peut-être comme ça :

Code:

Me.ComboBox1.AddItem Range("A1").Value, 0 Me.ComboBox1.AddItem Range("A2").Value, 1

Voir le fichier exemple en pièce jointe :
Clique sur le bouton USerForm. Dans la boîte de dialogue Ajout de données ouvre la ComboBox. Clique sur le bouton Ajouter et ouvre à nouveau la Combobox...

Bonjour Robert,

Merci pour cette solution simple et efficace.

Bonne soirée.
Fabrice

VBA ajouter 2 lignes au dessus des éléments listés dans la combobox

fb62840

XLDnaute Impliqué

Robert

XLDnaute Barbatruc

Pièces jointes

fb62840

XLDnaute Impliqué

Discussions similaires