[RESOLU] : recherche combobox avec deux colonnes

MADAGASCAR

XLDnaute Occasionnel
Bonjour forum
Bonjour a tous et a toutes
j'ai vraiment besoin de votre aide dans cet usf1 punible pour moi .. j'ai fais un grand effort pour adapter un code que je l'ai trouve dans ce forum .. je suis vraiment desolé car j'ai oublie dans quel sujet .. mon probleme c'est que je veux deux colonnes qui apparaissent dans ma combobox ( colonne D et colonne G ) tandisque ce code maintenant est adapte seulement pour colonne (D) ..comment ajouter un deuxieme colonne ( G ) dans ma combobox de recherche.
grand merci d'avance
cordialement
MADA
 

Fichiers joints

Dernière édition:

PMO2

XLDnaute Accro
Re : recherche combobox avec deux colonnes

Bonjour,

Peut être avec ce code modifié
Code:
Private Sub UserForm_Initialize()
With Sheets("Data")
DLig = .Range("D" & Rows.Count).End(xlUp).Row
Me.ComboBoxParNom.List = .Range("D11:G" & DLig & "").Value  '///modif
End With
Me.ComboBoxParNom.ColumnCount = 4               '///modif
Me.ComboBoxParNom.ColumnWidths = "50;0;0;50"    '///modif
End Sub
 

MADAGASCAR

XLDnaute Occasionnel
Re : recherche combobox avec deux colonnes

Bonjour,

Peut être avec ce code modifié
Code:
Private Sub UserForm_Initialize()
With Sheets("Data")
DLig = .Range("D" & Rows.Count).End(xlUp).Row
Me.ComboBoxParNom.List = .Range("D11:G" & DLig & "").Value  '///modif
End With
Me.ComboBoxParNom.ColumnCount = 4               '///modif
Me.ComboBoxParNom.ColumnWidths = "50;0;0;50"    '///modif
End Sub
Bonjour PMO2
merci beaucoup pour votre superbe idee
c'est ce que je veux voir dans ce fichier
c'est resolu
cordialement
MADA
 

Discussions similaires


Haut Bas