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

[Usine à gaz]

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.

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

 

[Usine à gaz]

Re Jean-Marie,
Re Mapomme,
Fatigué de ma journée et reprenant tôt demain,

Et puisque que mon lit m'appelle avec insistance ... je vais me reposer.
Bonne nuit à vous et merci pour ce que vous faites
Bonne nuit à toutes et à tous,
lionel

 

[Usine à gaz]

Bonjour à tous ceux qui ont bien voulu m'aider, Bonjour le Forum,
Bonne journée à toutes et à tous

Je reviens sur le sujet suite aux travaux de mapomme (comme disait Maurice) et de Jean-marie, que je remercie vraiment d'être toujours sur le sujet

Têtu comme une "usine à gaz", j'ai refait un fichier pour tenter d'avancer et aussi de mieux expliquer ce que j'attends :
Dans le fichier joint, j'ai inclus le code que Jean-Marie m'a fait (#post 47).
Le clic sur la cellule I2 ouvre l'UserForm du code de Jean-Marie et lol, j'en suis là ne sachant pas comment faire la suite.

Voici ce que je souhaite, à l'aide du code de Jean-Marie :
Dans le fichier j'ai ajouté le réseau "Capifrance",
Le "CommandButton" et le code correspondant ne sont pas créés dans l'UserForm pour ce réseau,
Est-il possible, dans l'UserForm "Agents_Mandataires", avec le code de Jean-Marie :
- d'y ajouter un "CommandButton"
- de modifier "caption",
- d'y ajouter une case,
Fichier test joint,
Un grand merci à vous 2,
lionel

 

[vgendron]

Hello
Juste pour illuster ma réponse en tout début de ce sujet

 

[ChTi160]

Bonsoir Lionel
Bonsoir vgendron ,le Forum
Lionel dans ton fichier il n'y a que 3 choix possibles.
dans ta base de données tu dis avoir environ 140 possible Choix mais que tu n'en utilises que 10 Max (si j'ai bien Compris)
comment fais tu le choix de ces 10 Choix Possibles (je ne sais pas si je me fais comprendre)
cette question avant de me Lancer Lol
Cordialement
Bonne fin de soirée
Jean marie

 

[ChTi160]

Re
Une première approche en attendant les Infos Lol
Jean marie

 

[Usine à gaz]

Hello
Juste pour illuster ma réponse en tout début de ce sujet

Bonsoir Lionel
Bonsoir vgendron ,le Forum
Lionel dans ton fichier il n'y a que 3 choix possibles.
dans ta base de données tu dis avoir environ 140 possible Choix mais que tu n'en utilises que 10 Max (si j'ai bien Compris)
comment fais tu le choix de ces 10 Choix Possibles (je ne sais pas si je me fais comprendre)
cette question avant de me Lancer Lol
Cordialement
Bonne fin de soirée
Jean marie

Bonsoir Jean-Marie,

Quand je dis qu'il y a environ 140 Réseaux c'est juste pour annoncer ce qui existe. Mais, je n'ai du tout à mettre 140 noms de Réseaux dans le fichier
Le fichier exemple contient juste un nom de Réseau à ajouter pour le test? si ça fonctionne pour un ajout de nom, ce sera super

 

[ChTi160]

Re
on s'est croisé !
je ne comprend pas Lol(t'inquiète c'est souvent)
ou alors ton Userform lors du lancement Contient 3 choix
tu veux vérifié a l'ouverture si dans la Base de Données il existe un Choix qui n'est pas présent dans le Userorm et L'ajouter au Userform?
Ou alors charger , à l'ouverture (dans le Userorm) les Choix présents dans la BDD ? (comme dans mon exemple)

jean marie

 

[Usine à gaz]

Hello
Juste pour illuster ma réponse en tout début de ce sujet

Bonjour vgendron, merci, bien reçu

 

[Usine à gaz]

Re-Jean-marie
lol, je dois être nul dans mes explications.
J'essaie d'être plus précis
dans le fichier du #post62.
Il y a 3 noms de réseaux en col A de la feuille "Appels" :
Agent Mandataire
BSK
Capifrance

Dans l'UserForm "Agents_Mandataires", 2 "CommandButton" sont créés pour :
- Agent Mandataire
- BSK

Est-il possible, dans l'UserForm "Agents_Mandataires", avec le code de Jean-Marie :
Pour CapiFrance de créer
- Le "CommandButton"
- de modifier "caption",
- d'y ajouter une case,

 

[ChTi160]

Re
un peu mieux Lol
Jean marie

 

[ChTi160]

Re
donc tu dis :

Dans l'UserForm "Agents_Mandataires", 2 "CommandButton" sont créés pour :
- Agent Mandataire
- BSK

Agent Mandataire
- BSK
sont donc toujours dans le Userform et y'a juste a en ajouter un "CapiFrance"
dans mon dernier exemple seuls les Réseaux 2 à 4 sont créés le premier étant déjà là à l'ouverture.
Jean marie

 

[Usine à gaz]

Re
donc tu dis :

Agent Mandataire
- BSK
sont donc toujours dans le Userform et y'a juste a en ajouter un "CapiFrance"
dans mon dernier exemple seuls les Réseaux 2 à 4 sont créés le premier étant déjà là à l'ouverture.
Jean marie

exact

 

[Usine à gaz]

exact

Mais Capifrance devrait être créé automatiquement à l'aide de ton code

 

[ChTi160]

Re
je regarde ça dès demain soir !
Bonne fin de Soirée
Jean marie
Ps :
ce n'est pas mon Code mais celui que tu as Joint a ton Fichier Lol que j'adapte !