XL 2021 Couleur de remplissage de cellule

[Sanni]

Bonsoir à tous!
J'ai besoin d'une astuce pour donner une couleur automatique à des cellules contenant les mèmes mots.
Exemple :
aaaa - bbb
aaaa - bbbbb
bbbbb - cccc
bbbbb - cccc
dddd - eeee
dddd - eeeeee
Je voudrais que toutes les cellules contenant les mots commençant par "aaaa" aient une mème couleur de façon automatique. Que toutes les cellules contant les noms composés commaçant par les mèmes mots au début aient une mème couleur de remplissage. Toutes les cellules n'auront pas la mème couleur car tous les noms ne commencent pas par les mèmes mots au début. Merci

 

[djidji59430]

Bonjour à tous,

Donc si tu as 30 mots différents, tu as trente couleurs différentes. Commence par faire un tableau avec les mots et les couleurs associées (30 !)

Crdlmt

 

[Sanni]

Bonjour à tous,

Donc si tu as 30 mots différents, tu as trente couleurs différentes. Commence par faire un tableau avec les mots et les couleurs associées (30 !)

Crdlmt

ok

 

[Sanni]

Bonjour à tous,

Donc si tu as 30 mots différents, tu as trente couleurs différentes. Commence par faire un tableau avec les mots et les couleurs associées (30 !)

Crdlmt

Bonsoir, voici en pièce-jointe les couleurs. Merci

 

[Staple1600]

Bonjour


Fonctionne (apparemment) sur l'exemple

Sub couleur()
Dim c As Range
For Each c In Selection
lig = Application.Match(VBA.Trim(Split(c, "-")(0)), Range("G2:G44"), 0)
If lig > 0 Then
c.Interior.Color = Range("G" & lig + 1).Interior.Color
End If
Next
End Sub

Avant de tester, sélectionnes les cellules B3:B119 puis lancer la macro.

 

[Sanni]

Bonjour


Fonctionne (apparemment) sur l'exemple

Sub couleur()
Dim c As Range
For Each c In Selection
lig = Application.Match(VBA.Trim(Split(c, "-")(0)), Range("G2:G44"), 0)
If lig > 0 Then
c.Interior.Color = Range("G" & lig + 1).Interior.Color
End If
Next
End Sub

Avant de tester, sélectionnes les cellules B3:B119 puis lancer la macro.

Bonjour! Peut on le faire sans macro?

 

[JHA]

Bonjour à tous,

Il y a trop de MFC à construire, je te propose un tableau avec un segment pas de couleur mais plus lisible enfin pour moi.

JHA

 

[Sanni]

Bonjour à tous,

Il y a trop de MFC à construire, je te propose un tableau avec un segment pas de couleur mais plus lisible enfin pour moi.

JHA

Merci beaucoup, mais toutes les données doivent ètre affichées, je ne veux pas utiliser de filtre.

 

[djidji59430]

une proposition :
j'ai fait bbbb et dddd
tu fais les autres !!

 

[Sanni]

Bonj

une proposition :
j'ai fait bbbb et dddd
tu fais les autres !!

our, je n'ai pas compris ce que vous avez fait.

 

[djidji59430]

j'ai fait las formuledes mfc pour ces 2 cas

Crdlmt

 

[Sanni]

j'ai fait las formuledes mfc pour ces 2 cas

Crdlmt

Excusez moi, dans quelle cellule se trouve la formule? je ne vois pas de formule.

 

[djidji59430]

tu ne sais pas ce qu'est une mise en forme conditionelle ?
donc de la litterature ....

Google Search

www.google.com

dans ton fichier, tu selectionnes la premiere cellule et dans le bandeau accueil, mise en forme conditionelle ==> gerer les regles : tu vas voir ta formule !

 

[Sanni]

tu ne sais pas ce qu'est une mise en forme conditionelle ?
donc de la litterature ....

Google Search

www.google.com

dans ton fichier, tu selectionnes la premiere cellule et dans le bandeau accueil, mise en forme conditionelle ==> gerer les regles : tu vas voir ta formule !

Je sais très bien ce que s'est qu'une mise en forme conditionnelle, mais je ne savais pas que c'est ça que tu abrèges en MFC. C'est parce que cela me prenait du temps que j'ai demandé d'aide ici pour une autre méthode.

 

[djidji59430]

Alors, en VBA
repose ta question en precisant que tu veux ue solution en VBA

Crdlmt