Bug sur un code vba

Fermé
jc80 Messages postés 4242 Date d'inscription mardi 5 février 2013 Statut Membre Dernière intervention 25 février 2019 - 18 août 2015 à 17:01
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 19 août 2015 à 07:36
Bonjour,

Je m'entraine à créer un userform mais j'ai un problème avec un morceau de code

https://www.cjoint.com/c/EHso5ez3113
le bug survient quand je veux mettre dans la combobox code client le n° qui se trouve
dans la liste déroulante.
Merci pour votre aide.
Cordialement

A voir également:

2 réponses

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 306
18 août 2015 à 17:19
Bonjour

Private Sub Clients_Initialize()

il n'y a pas d'usf portant ce nom... confusion probable avec caption= "clients"

Private Sub userform_Initialize()


0
jc80 Messages postés 4242 Date d'inscription mardi 5 février 2013 Statut Membre Dernière intervention 25 février 2019 1 424
18 août 2015 à 17:27
Bonjour michel
Merci pour ton aide

j'ai bien fait la manoeuvre mais j'ai toujours le bug sur cette ligne
ComboBox2 = Ws.Cells(Ligne, "B")
0
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 306
19 août 2015 à 07:36
Bojour

Tout simplement:

Set Ws = Sheets("Clients") 'Correspond au nom de votre onglet dans le fichier Excel
ComboBox2.List() = Array("", "M.", "Mme", "Mlle")

au lieu de
ComboBox2.List() = Array("", "M.", "Mme", "Mlle")
Set Ws = Sheets("Clients")

0