Microsoft 365 Choisir une ListBox pour colorer les textes de mon menu

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
Bonjour à toutes et à tous,
Je vous souhaite un beau WE :)

J'en ai une petite pour le WE ...
Dans le fichier test joint :
Quand clic sur "filtrage UF" pour afficher ma Listbox, j'aimerais que les textes soient colorés.
1651929898874.png

J'ai pas trouvé pour l'instant malgré mes recherches et je continue à chercher ...
Auriez-vous les bons codes ?
Merci à toutes et à tous,
Amicalement,
lionel :)
 

Pièces jointes

  • z Filtre_couleur.xlsm
    37.2 KB · Affichages: 13
Dernière édition:
Solution
re
un petit exemple avec des labels
tu peux choisir les array colonnes des le départ ainsi que les couleurs dans l'appel
ou 1,2,3,4 par défaut et les couleurs noir,bleu,rose,et jaune par défaut
a toi de rajouter ce qu'il te faut dans le "menu_Click" si tu va plus loin que 4
réutilisable à souhait
bonne journée à tous ;)

ChTi160

XLDnaute Barbatruc
Re
Ton fichier en retour !
Je n'ai fait que mettre les choses en place Lol
J'ai suivi les indications !
J'ai créé un Userform ou j'ai placé le Code indiqué
J'ai créé un module standart
J'y ai placé le code Indiqué
J'ai créé un Module de Classe ou j'ai placé le Code Indiqué Lol
Cordialement
N'hésite pas !
Jean marie
 

Pièces jointes

  • Infos sur le net Lionel-1.xlsm
    35.8 KB · Affichages: 2

Usine à gaz

XLDnaute Barbatruc
Supporter XLD
J'ai oublié de te remercier pour le travail que tu as fait ... je t'en remercie et aussi pour vouloir m'aider.
LOL, c'est l'inverse :)

Dans l'Userform EXISTANT du fichier test en #post 41, à l'aide du code du fichier du #post 46 (intégré dans le fichier du #post 41) :
- ajouter un "CommandButton"
- modifier "caption",
- ajouter une case,

Je ne vois pas comment faire :)
 

mapomme

XLDnaute Barbatruc
Supporter XLD
Il faut savoir qu'il existe plus de 140 Réseaux et il y en a des nouveaux presque chaque jour.

Ma demande (mais est-ce possible ?) :
A chaque ajout de réseau, il me faut :
- ajouter un "CommandButton"
- modifier "caption",
- ajouter une case,

Avec 140 réseaux, un userform est à mon avis assez compliqué à gérer.

Un essai avec :
  • Une feuille supplémentaire masquée qui sert de formulaire (nommée "Filtrage")
  • Une feuille supplémentaire masquée qui sert de référence de couleur (nommée "Couleur"). Les couleurs sont modifiables tant en valeur de fond ou de police mais aussi en nombre (rotation sur 15 couleurs pour l'exemple)
Quand on clique sur le bouton "Filtrage", on construit et affiche la feuille "Filtrage" :
  • un clique sur un pseudo-bouton fait le filtrage sur la feuille "Appels"
  • Elle s'adapte donc en temps réel au nombre de réseaux trouvés sur la feuille "Appels"
  • Sur mon écran (27 pouces) tous les boutons s'affichent sans avoir besoin de la roulette
  • S'il le faut, la molette de la souris fait le défilement
Tout comme on a ajouté le bouton "Afficher tout", on pourrait afficher d'autres boutons avec des filtrages un peu particulier (par exemple les niveaux 1 à 4)

Le code principal est dans le module de la feuille "Filtrage". Il est un tout petit peu commenté. Il n'y a plus de Userform.

Il y a environ 2 000 lignes de data dans "Appels" pour 140 opérateurs. Les pseudo-boutons sont classés par ordre alphabétique de la gauche vers la droite et du haut vers le bas.
 

Pièces jointes

  • Usine à gaz- Filtre- coloré- v1.xlsm
    71.2 KB · Affichages: 7

ChTi160

XLDnaute Barbatruc
Bonsoir Lionel
Bonsoir mapomme
Lionel n'utilise pas les 140 références à la fois
A. Ce que j'ai compris il n'en choisir que quelques unes (il modifie le(s) fichier(s)) chaque jours.
Je pensais moi à une colonne supplémentaire dans sa BDD ou seraient mis des "x" par exemple pour la sélection du jour ! Lol
Et le userform serait mis à jour (avec ou sans la création en live) des Boutons .
Enfin a voir lol
Bonne fin de soirée
Jean marie
 

Discussions similaires

Réponses
9
Affichages
661

Membres actuellement en ligne

Statistiques des forums

Discussions
312 294
Messages
2 086 895
Membres
103 404
dernier inscrit
sultan87