modifier la couleur de police

[Guest]

bonjour à tous,
j'ai trouvé le code suivant sur le net qui fonctionne très bien mais que je cherche à adapter :

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
deb = InStr(1, Target.Value, "/")
If deb <> 0 Then
Target.Characters(deb, Len(Target)).Font.ColorIndex = 2
End If
End Sub

ce qui permet de changer la couleur de police à partir du signe "/"
commen faire pour changer la couleur de police AVANT "/"
et comment faire pour que "/" change également de couleur
dans ce code la police devient "blanche" ce qui efface visuellement la partie d'un texte

et si vous pouvez m'expliquer ce code
merci d'avance

 

[Victor21]

Re : modifier la couleur de police

Bonjour.

Essayez de remplacer

Target.Characters(deb, Len(Target)).Font.ColorIndex = 2

par

Target.Characters(1,deb).Font.ColorIndex = 2

Non testé en l'absence de fichier joint.
Pour les explications, effectuez une recherche dans l'aide VBA via F1 (sur InStr et sur Characters).

 

[Guest]

Re : modifier la couleur de police

Bonjour victor
j'étais en train de le faire mais tu as été plus rapide que moi
voila le fichier

 

[Victor21]

Re : modifier la couleur de police

Re,

Avez-vous testé ? Ou souhaitez-vous que je le fasse ?

 

[Guest]

Re : modifier la couleur de police

oui je veux bien car je ne suis pas sur d'avoir bien expliqué ma demande
j'ai noté dans le fichier joint ce que je souhaite faire
merci

 

[Victor21]

Re : modifier la couleur de police

Re,

C'était une boutade, dubdub.
Vous avez tous les éléments pour tester par vous-même.
Placez-vous dans l'éditeur VBA (Alt+F11).
Dans le module de la feuille concernée, copiez la macro originale.
Remplacez la ligne indiquée dans mon antépénultième réponse.
Retournez sur la feuille et choisissez un item dans la colonne contenant la liste déroulante.

PS : les macros, c'est bien. C'est même très bien. Mais faites l'effort de les comprendre si vous voulez les utiliser. Sinon, à chaque modification, vous serez bloqué.

 

[Guest]

Re : modifier la couleur de police

bonjour,
(j'ai essayé de modifier le code en changeant les termes,j'ai essayé de traduire le code mais je n'ai pas trouvé la réponse)
en tous cas c'est parfait merci
cordialement