Ma zone de liste déroulante n'affiche pas les valeurs que j'ai ajouté en VBA

Je suis en train d'ajouter des options à une zone de liste déroulante dans un formulaire utilisateur. Lorsque j'exécute le code, Excel ne donnent pas toutes les erreurs, cependant lorsque l'objet userform s'affiche il n'affiche pas les entités, j'ai ajouté à la zone de liste déroulante précédemment. C'est, quand je clique sur la zone de liste déroulante, il ne montre pas toutes les options, une seule ligne vide, comme si aucun élément n'a été ajouté.

Voici le code que j'utilise:

Private Sub UserForm_Initialize()
    ComboBox1.AddItem "xxx"
    ComboBox1.AddItem "yyy"
    ComboBox1.AddItem "zzz"
End Sub

J'utilise le code suivant pour appeler le formulaire utilisateur à l'intérieur d'une macro:

UserForm.Show
  • Où est le UserForm_Initilize() code collé? Il doit être dans l'userform
  • Je crois que le userform ne marche pas nécessairement initialiser à chaque fois que vous chargez - si vous êtes en affichage et masquage plus d'une fois puis l'initialiser le code doit s'exécuter uniquement une fois. Essayez d'ajouter un point d'arrêt à ce code pour voir si ça fonctionne réellement?
  • * * * Le Code est dans le userform *je ne pense pas que le code s'exécute correctement Acantud, il fonctionne même quand je désactive le code.
InformationsquelleAutor Dubeddo | 2014-06-14
  1. 2

    Le code donné dans la question fonctionne parfaitement bien. Dans mon cas, le code ne fonctionne pas parce que j'ai entré manuellement la présente partie du code en VBA:

    Private Sub UserForm_Initialize()

    Si vous faites Excel créer ce module pour vous au lieu de l'écrire sur votre propre, votre code doit fonctionner parfaitement. Excel n'a pas eu "Initialiser" comme formulaire par défaut j'ai donc essayé "Activer" et cela a fonctionné.

    Pour créer ce module, vous devez faire les étapes suivantes:

    1. Clic droit sur le formulaire utilisateur
    2. Cliquez sur afficher le code
    3. En haut, vous verrez deux catégories, vous pouvez choisir, vous devez choisir "Userform" et "Activer", à l'issue de cette étape excel doit ajouter un nouveau module à votre code.
    4. Dans ce module, vous pouvez code tout ce que vous voulez sur le contenu de la zone de liste déroulante.

    Vous devez également faire attention à l'orthographe de votre zone de liste déroulante, si vous sort de manière incorrecte, vous risquez de ne pas voir le contenu de la zone de liste déroulante.

    InformationsquelleAutor Dubeddo
  2. 0

    S'assurer que le segment de code que vous avez posté est dans l'objet userform.

    Clic droit sur le formulaire utilisateur dans le VBA et choisissez "Afficher le Code". Est-ce là le code est?

    Êtes-vous sûr que le Formulaire Utilisateur est appelé "UserForm" et non pas "UserForm1'? 'UserForm1" est la valeur par défaut, similaire à la "ComboBox1'.

    Ci-dessous fonctionne pour moi.

    'in the UserForm1 code
Private Sub UserForm_Initialize()
ComboBox1.AddItem "xxx"
ComboBox1.AddItem "yyy"
ComboBox1.AddItem "zzz"
End Sub

    Le ci-dessous affiche le formulaire.

    UserForm1.Show

    Est-ce la seule forme dans le classeur? Créer un nouveau et de voir si ça fait la même chose.

    • J'ai fait exactement comme vous l'avez décrit, mais il ne fonctionne toujours pas. J'ai aussi le nom de l'utilisateur forme correcte.
    • Le code ci-dessus devrait fonctionner. Est-ce la seule forme dans le classeur? Créer un nouveau et de voir si ça fait la même chose.
    • Merci beaucoup pour votre aide, je crois que j'ai trouvé la couse du problème.
    InformationsquelleAutor edsolutions