Cours vba les controles suite
Cours VBA les contrôles suite http www excel-pratique com fr vba controles suite php Les contrôles peuvent être utilisés en dehors des UserForms Pour cet exemple nous utiliserons les contrôles directement sur la feuille Notez tout d'abord que le Mode Création doit être activé pour modi ?er un contrôle placé sur une feuille et désactivé pour utiliser le contrôle Pour les versions d'Excel inférieures à bouton sur la barre Bo? te à outils Contrôles Avant de détailler cet exemple en voici un aperçu L'objectif est de colorer et sélectionner une cellule gr? ce aux barres de dé ?lement dans la zone dé ?nie de lignes x colonnes Les propriétés de la barre de dé ?lement verticale Min Max puisque lignes Value position de la barre entre et ici Même chose avec la barre horizontale avec un Max à Voici le code qui sera appliqué à chaque changement de valeur Value de la barre verticale 'Couleur grise sur les cellules Cells Interior Color RGB 'Couleur et sélection de la cellule With Cells ScrollBarverticale Value ActiveCell Column 'Cellule par rapport à Value Interior Color RGB 'Couleur orange Select 'Sélection de la cellule End With Ce code sera exécuté avec les événements Change et Scroll pour lancer les instructions quelle que soit la partie de la barre de dé ?lement qui est cliquée Voici le code pour la barre verticale Private Sub barreverticale 'Couleur grise sur les cellules Cells Interior Color RGB of CCours VBA les contrôles suite 'Couleur et sélection de la cellule With Cells ScrollBarverticale Value ActiveCell Column Interior Color RGB 'Orange Select 'Sélection de la cellule End With End Sub Private Sub ScrollBarverticaleChange barreverticale End Sub Private Sub ScrollBarverticaleScroll barreverticale End Sub Et celui de la barre horizontale Private Sub barrehorizontale 'Couleur grise sur les cellules Cells Interior Color RGB 'Couleur et sélection de la cellule With Cells ActiveCell Row ScrollBarhorizontale Value Interior Color RGB 'Orange Select 'Sélection de la cellule End With End Sub Private Sub ScrollBarhorizontaleChange barrehorizontale End Sub Private Sub ScrollBarhorizontaleScroll barre horizontale End Sub Le ?chier scrollbar xls http www excel-pratique com fr vba controles suite php Voici le point de départ de ce nouvel exemple Le ?chier userform xls Au lancement de l'UserForm nous voulons que les pays soient chargés dans la liste déroulante avec la méthode AddItem Private Sub UserFormInitialize For i To ' pour lister les pays ComboBoxPays AddItem Cells i 'Ajoute les valeurs des cellules A à A avec la boucle Next End Sub Au changement de valeur de la liste déroulante nous voulons ajouter les villes correspondant au pays choisi avec une boucle semblable à celle ci- dessus Pour le faire nous avons besoin du n de colonne et du nombre de lignes La propriété ListIndex correspond au n de la sélection dans la liste contrairement à Value qui correspond à la valeur à noter que ListIndex commence à Le n de colonne est donc nocolonne ComboBoxPays ListIndex of Pour obtenir le nombre de lignes de la colonne du pays choisi
Documents similaires










-
32
-
0
-
0
Licence et utilisation
Gratuit pour un usage personnel Aucune attribution requise- Détails
- Publié le Jan 06, 2023
- Catégorie Geography / Geogra...
- Langue French
- Taille du fichier 38.7kB