Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 Changer la police dans un Combobox

Bill73

XLDnaute Junior
Bonjour le forum,
j'ai une petite question concernant les Combobox.
j'aimerais, en fonction de la réponse d'un premier combobox, adapter la police d'un deuxième combobox, c'est à dire, passer la police type ARIAL en Wingdings, et le cas échéant, revenir à Arial par exemple.
J'ai essayé
VB:
.Font.Name = "Wingdings"
mais ça ne change pas l'affichage.
 

patricktoulon

XLDnaute Barbatruc
Bonjour un fichier pour l'exemple anonymisé aurait été le bien venu
ca évite au benevole de se taper la création du classeur
dans l'exemple qui suit si on selection un nombre pai dans la combo 1 la combo2 sera en font "wingdings" sinon arial
 

Pièces jointes

  • exemple.xlsm
    13.8 KB · Affichages: 5

Bill73

XLDnaute Junior
Bonjour Phil & Patrick,

avant tout, le fait que je ne suis pas dans un UserForm, mais sur une feuille pourrait poser problème pour l'affichage ?
je regarde pour faire un bout de code qui correspond.
 

Bill73

XLDnaute Junior
@Phil,
pour les explications, c'est simple :
- certaines réponses dans le combobox1 sont des choix (combobox2) en mode texte
- deux réponses du combobox1 sont des choix (combobox2) en mode "graphiques"

il faut que je parte, mais je fait un bout de code en rentrant et je l'envoie
 

Bill73

XLDnaute Junior
...et voilà un bout de code qui correspond à ce que je veux.
En me relisant, je m'aperçois que je me suis mal expliqué :
- le deuxième combo comporte une liste de choix aussi et c'est cette liste que j'aimerais avoir en Wingdings dans certains cas.
 

Pièces jointes

  • fontcombo.xlsm
    29.4 KB · Affichages: 2

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…