Contenu

• Les instructions
• Ce dont vous avez besoin

L'utilisation d'un contrôle ListView avec des cases à cocher sur un formulaire VBA peut rendre une application plus dynamique en fournissant des options à l'utilisateur. Un ListView affiche les éléments en utilisant l’une des quatre vues différentes et les organise en colonnes avec ou sans en-tête Microsoft Excel. Utilisez la propriété "ListItems.Add" pour ajouter des éléments et "Coché" pour déterminer les éléments sélectionnés par l'utilisateur.

Les instructions

Remplissez le contrôle ListView dans Excel à l'aide de VBA (Hemera Technologies / Photos.com / Getty Images)

1. Ouvrez Microsoft Excel, cliquez sur l'onglet "Développeur" puis sur "Visual Basic" pour ouvrir la fenêtre de l'éditeur VBA. Cliquez sur le menu "Insertion" puis sur "UserForm" (formulaire utilisateur) pour créer un nouveau formulaire. Cliquez sur "Outils", "Contrôles supplémentaires", puis cochez la case en regard de "Contrôle Microsoft ListView" (contrôle Microsoft ListView) pour ajouter un nouveau contrôle "ListView" au formulaire.

2. Cliquez avec le bouton droit sur le contrôle "ListView", puis sur "Propriétés". Faites défiler la fenêtre et choisissez "True" à côté de l'option "Cases à cocher". Cliquez sur "Bouton de commande" dans le volet "Boîte à outils", puis sur le formulaire pour ajouter un nouveau bouton. Ajoutez un deuxième bouton en suivant les mêmes étapes.

   
   

3. Double-cliquez sur "CommandButton1" pour créer un nouvel événement pour ce bouton. Ajoutez le code suivant au populaire "ListBox" avec trois éléments:

   Me.ListView1.ListItems.Add (1) = "Élément de contrôle 1" Me.ListView1.ListItems.Add (2) = "Élément de contrôle 2" "Me.ListView1.ListItems.Add (3) =" Élément de contrôle 3 "

4. Retournez au formulaire et double-cliquez sur "CommandButton2" pour créer un nouvel événement de clic pour ce bouton. Ajoutez le code suivant pour parcourir les éléments "ListBox" et afficher les éléments sélectionnés dans la fenêtre "Immédiat":

   For counter = 1 To Me.ListView1.ListItems.Count Si Me.ListView1.ListItems.Item (compteur) .Vérifié Puis Debug.Imprimer Me.ListView1.ListItems.Item (compteur) .Text End Si Suivant

   
   

5. Retournez au formulaire et cliquez sur "F5" pour exécuter le programme. Cliquez ensuite sur "CommandButton1" pour renseigner le contrôle "ListView" puis sur "CommandButton2" pour afficher les éléments sélectionnés.

Ce dont vous avez besoin

• Microsoft Excel