Petit souci avec un ComboBox

Bien le bonjour

Bon je debut en vb alors soyer un peu indulgent

Voila j'ai fait un petit UserForm dedans j'ai une combobox qui récupère le nom d'un client dans une autre feuille (Juste que là pas de souci ) .

Le problème arrive quand je sélectionne le nom dans la combobox je voudrais que sa me l'affiche dans un textbox pour le nom et un autre pour le prenom mais sa n'affiche rien

Dim ligneEnreg
Private Sub UserForm_Initialize()
      Me.ComboBox1.RowSource = "BdClients!C2:C" & Sheets("BdClients").Cells(1, 1).End(xlDown).Row
End Sub

Private Sub ComboBox1_Change()
    ligneEnreg = Sheets("BdClients").[C:C].Find(ComboBox1, LookIn:=xlValues).Row
    Me.TextBox1 = Cells(ligneEnreg, "C")
    Me.TextBox2 = Cells(ligneEnreg, "D")
End Sub

merci bien

Bonjour

Essaie comme ça mais ce serait mieux avec ton fichier :

    Me.TextBox1 = Sheets("BdClients").Cells(ligneEnreg, "C")
    Me.TextBox2 = Sheets("BdClients").Cells(ligneEnreg, "D")

Bye !

Ha yes super merci sa fonctionne super bien

Rechercher des sujets similaires à "petit souci combobox"