Bug sur un code vba

jc80 Messages postés 5063 Date d'inscription   Statut Membre Dernière intervention   -  
michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   -
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

2 réponses

  1. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    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
    1. jc80 Messages postés 5063 Date d'inscription   Statut Membre Dernière intervention   1 443
       
      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
  2. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    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