Bonjour à tous
J'ai un combobox que j'appelle Cb_BL qui est une zone de recherche qui doit m'afficher les données de la colonne C et D de data mai il ne m'affiche que le titre et une ligne voici le code que j'ai écrit
Option Compare Text
Dim clé()
Dim f As Worksheet
Private Sub UserForm_initialize()
Set f = Data
Me.Modereglement.List = Array("CHEQUE", "ESPECE", "PERMANENT")
Me.Typecaution.List = Array("PERMANENTE", "PONCTUELLE", "LETTRE DE GARANTIE")
Me.Loisirs.List = Array("20'", "40'", "20'Frigo", "40'Frigo")
Me.Commentaire.List = Array("", "ANNULE", "RETOURNE")
clé = f.Range("C2:D" & [C65000].End(xlUp).Row).Value
Me.Cb_bl.List = clé
[attachment=0]test.xlsm[/attachment]
Me.Bl.SetFocus
End Sub
Pourriez vous me dire ou se trouve mon erreur?