COULEUR SELON lettre

  • Initiateur de la discussion serval
  • Date de début
S

serval

Guest
COMMENT AFFECTER DES COULEURS A DES LETTRE PAR EXEMPLE SI LA LETTR H = ROUGE F= bleu s=vert t = orange comment faire pour que chaque fois que je tape ces lettres dans 1 cellules la couleur s affiche aussi
estce possible aussi d affecter des touche a ces lettres exmple la toucheF1=h =rouge F2=F=BLEU F3=S= vert ou alors juste les touche et les couleur F1=ROUGE F2=bleu ect merci
 
B

BOUDALI

Guest
'chaque lettre d'une cellule a une couleur

Sub coulCar()

For i = 1 To ActiveCell.Characters.Count
With ActiveCell.Characters(Start:=i, Length:=1).Font
Select Case ActiveCell.Characters(Start:=i, Length:=1).Caption
Case "a"
.ColorIndex = 5
Case "b"
.ColorIndex = 6
End Select
End With
Next i

End Sub
 

Discussions similaires

Statistiques des forums

Discussions
312 206
Messages
2 086 202
Membres
103 157
dernier inscrit
youma