[RESOLU] : recherche combobox avec deux colonnes

[MADAGASCAR]

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

 

[PMO2]

Re : recherche combobox avec deux colonnes

Bonjour,

Peut être avec ce code modifié

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]

Re : recherche combobox avec deux colonnes

Bonjour,

Peut être avec ce code modifié

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