VBA Excel - Changer la couleur d'un caractère spécifique

atk_49 Messages postés 332 Statut Membre -  
ccm81 Messages postés 11033 Statut Membre -
Bonjour,

Comme le titre l'indique, je souhaiterais que tous les "underscores" "_" d'un tableau excel soient de couleur blanche. (pour les rendre invisibles sans les supprimer)

Y-en a t-il parmi vous qui aurait une idée du code à utiliser ?

Merci d'avance et bon vendredi ! :)
A voir également:

6 réponses

ccm81 Messages postés 11033 Statut Membre 2 433
 
1. j'ai aussi remarqué que ton code modifiait toutes les premières lettres sans distinctions
ah bon, pas chez moi?

2. j'aimerais que ça s'applique sur tout le tableau
Et qui colore tous les underscore de la cellule
https://www.cjoint.com/?3LnrIBoietN

Cdlmnt
1
Max80250 Messages postés 12 Statut Membre
 
Bonjour

Je te suggère de passer par la forme conditionnelle de la cellule afin d'avoir le rendu que tu souhaites

Cela se trouve dans format

Non courage
0
atk_49 Messages postés 332 Statut Membre 15
 
Bonjour Max,

Merci pour ta réponse, j'ai bien chercher mais je ne trouve pas ce qu'il me faut dans cette fonction.

Je ne pense pas que ça soit possible sans VBA. :/
0
ccm81 Messages postés 11033 Statut Membre 2 433
 
Bonjour

une petite macro qui colore en coul le caractère car de ntoutes les cellules sélectionnées

Const car = "_"
Const coul = 2    ' blanc

Public Sub CouleurCaractere()
Dim c As Range, rangcar As Long
For Each c In Selection
  rangcar = InStr(1, c.Value, car)
  c.Characters(rangcar, 1).Font.ColorIndex = coul
Next c
End Sub


Cdlmnt
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
atk_49 Messages postés 332 Statut Membre 15
 
Bonjour ccm81, merci pour ta proposition !

J'ai essayé, seulement j'aimerais que ça s'applique sur tout le tableau, j'ai aussi remarqué que ton code modifiait toutes les premières lettres sans distinctions.
0
atk_49 Messages postés 332 Statut Membre 15
 
Merci c'est juste parfait ! :)

Bonne journée à toi !
0
ccm81 Messages postés 11033 Statut Membre 2 433
 
De rien,

Peux tu mettre le sujet à Résolu (en haut à droite dans ton message initial

Bonne soirée
0