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

Mettre la 1ère lettre d'un mot en gras et en rouge

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

aubelix

XLDnaute Impliqué
Bonjour à tous les amis du Forum. 🙂

Une nouvelle question concernant la mise en forme de mots d'un colonne :
Comment mettre la 1ère lettre d'un mot en gras et en rouge
Comme l'exemple ci-dessous : (voir fichier joint)

ALLO
BATEAU
COCORICO
DODO
RATEAU
CHARLOT
POTEAU

Les mots sont de longueurs variables ainsi que le nombre.

Par avance, Merci pour votre aide.
Cordialement.
 

Pièces jointes

Re : Mettre la 1ère lettre d'un mot en gras et en rouge

Bonjour,

Sélectionner le champ

Code:
Sub essai()
 For Each c In Selection
   c.Characters(Start:=1, Length:=1).Font.ColorIndex = 3
   c.Characters(Start:=1, Length:=1).Font.Bold = True
 Next
End Sub

JB
Formation Excel VBA JB
 

Pièces jointes

Re : Mettre la 1ère lettre d'un mot en gras et en rouge

Merci Jacques et PierreJean pour vos réponses respectives. 🙂

La macro de Jacques Fonctionne.
Mais PierreJean, il ne se passe rien lorsque je clique dur le bouton.
J'ai essayé :
Outils -Macro - Executer - Test, même résultat. 😕
J'aimerai comprendre ce qui ne va pas.

Cordialement.
 
Re : Mettre la 1ère lettre d'un mot en gras et en rouge

Re

je viens de tester le fichier et chez moi cela marche

D'ailleurs tu remarqueras que le code ressemble furieusement a celui de notre ami Jacques
 
Dernière édition:
Re : Mettre la 1ère lettre d'un mot en gras et en rouge

Mille excuses Pierrejean. 😱

J'ai testé la macro de Jacques en premier.
Je suis resté sur la colonne "C".
Je viens de m'apercevoir en créant un nouveau classeur
que c'était la colonne B dans ta macro comme je l'avais demandée.
Ta macro fonctionne très bien. 😉

Cordialement.
 
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

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