XL 2016 Comment colorier les mots déjà en rouge en bleu d'une colonne

dindin · 16 Décembre 2019

Bonsoir le forum
je reprend une BD faite par un ami
j'ai dans la colonne B des mots déjà coloriées en rouge (mot dans une phrase).
le travail est fait dés le départ à la main suivant le contenu.
Comment faire pour changer la couleur en bleu et en mettre gras chaque mot déjà en rouge sans refaire la manip de 1000 lignes encore une fois à la main
j'ai essayé en MFC mais je n'ai pas réussi
y'a t-il une solution
Merci à tous pour votre aide

laurent950 · 16 Décembre 2019

Bonsoir le Forum,
exemple :
lien utile pour les couleurs : https://forum.excel-pratique.com/viewtopic.php?t=21547

VB:

Sub test()
Dim Plg As Range
Set Plg = Range("B3:B7")
Dim c As Range
For Each c In Plg
    For I = 1 To Len(c.Value)
        If c.Characters(I, 1).Font.ColorIndex = 3 Then
            c.Characters(I, 1).Font.ColorIndex = 5
            c.Characters(I, 1).Font.Bold = True
        End If
        Next I
Next c
End Sub

dindin · 17 Décembre 2019

laurent950 à dit:
Bonsoir le Forum,
exemple :
lien utile pour les couleurs : https://forum.excel-pratique.com/viewtopic.php?t=21547

VB:

Sub test() Dim Plg As Range Set Plg = Range("B3:B7") Dim c As Range For Each c In Plg For I = 1 To Len(c.Value) If c.Characters(I, 1).Font.ColorIndex = 3 Then c.Characters(I, 1).Font.ColorIndex = 5 c.Characters(I, 1).Font.Bold = True End If Next I Next c End Sub

beau code et en plus fonctionne très bien
Merci Laurent950

XL 2016 Comment colorier les mots déjà en rouge en bleu d'une colonne

dindin

XLDnaute Occasionnel

Pièces jointes

laurent950

XLDnaute Barbatruc

dindin

XLDnaute Occasionnel

Discussions similaires