Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Manipulation avec la couleur du texte

Manipulation avec la couleur du texte

4 réponses
Avatar
Kevin
Bonjours,

Je cherche une formule pour exprimer ceci :

SI ( le texte de A1 =3D bleu;
Alors (cellule =3D A1 mais texte en rouge))


Apr=E8s j'aurais besoin de faire les sommes de mes chiffres
rouge et blue

Merci de votre aide
Signaler un problème avec ce contenu

4 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Dédé
Salut Kevin !

Ben j'ai fais une petite macro pour te faire tout ça ...

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("a1").Font.ColorIndex = 5 Then
Range("b1").Font.ColorIndex = 3
Range("c1").Value = [a1] + [B1]
Else
Range("c1").Value = ""
Range("A1:B1").Font.ColorIndex = 1
End If
End Sub

Est-ce que cela te convient ?

Salutations
Dédé
"Kevin" a écrit dans le message de
news:084501c349fd$51c1e140$
Bonjours,

Je cherche une formule pour exprimer ceci :

SI ( le texte de A1 = bleu;
Alors (cellule = A1 mais texte en rouge))


Après j'aurais besoin de faire les sommes de mes chiffres
rouge et blue

Merci de votre aide
Avatar
Kevin
Merci pour ce merveilleux code VB.

J'ai fait un peu de VB donc la compréhention est bonne mais
par contre je députe sur Excel (en tout cas a ce niveau ;-)

Comment je fais pour crée cette macro et comment je fait
pour l'utilisé??

Si t'arrive a me rafréchir la mémoire pour la premiere
ligne ca serait très sympatique.

encore merci

Kevin
-----Message d'origine-----
Salut Kevin !

Ben j'ai fais une petite macro pour te faire tout ça ...

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("a1").Font.ColorIndex = 5 Then
Range("b1").Font.ColorIndex = 3
Range("c1").Value = [a1] + [B1]
Else
Range("c1").Value = ""
Range("A1:B1").Font.ColorIndex = 1
End If
End Sub

Est-ce que cela te convient ?

Salutations
Dédé
"Kevin" a écrit dans le message de
news:084501c349fd$51c1e140$
Bonjours,

Je cherche une formule pour exprimer ceci :

SI ( le texte de A1 = bleu;
Alors (cellule = A1 mais texte en rouge))


Après j'aurais besoin de faire les sommes de mes chiffres
rouge et blue

Merci de votre aide


.



Avatar
Eric
Bonsoir Kevin,

Pour utiliser cette macro tu la copies dans le code de la feuille (Clic
droit sur l'onglet de la feuille/Visualiser le code) tu la colles ici. Elle
devrait s'executer toute seul à chaques changement dans la feuille.

Bon courage, et surtout merci à Dédé

Eric

"Kevin" a écrit dans le message de news:
091201c34a16$ec9d8cf0$
Merci pour ce merveilleux code VB.

J'ai fait un peu de VB donc la compréhention est bonne mais
par contre je députe sur Excel (en tout cas a ce niveau ;-)

Comment je fais pour crée cette macro et comment je fait
pour l'utilisé??

Si t'arrive a me rafréchir la mémoire pour la premiere
ligne ca serait très sympatique.

encore merci

Kevin
-----Message d'origine-----
Salut Kevin !

Ben j'ai fais une petite macro pour te faire tout ça ...

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("a1").Font.ColorIndex = 5 Then
Range("b1").Font.ColorIndex = 3
Range("c1").Value = [a1] + [B1]
Else
Range("c1").Value = ""
Range("A1:B1").Font.ColorIndex = 1
End If
End Sub

Est-ce que cela te convient ?

Salutations
Dédé
"Kevin" a écrit dans le message de
news:084501c349fd$51c1e140$
Bonjours,

Je cherche une formule pour exprimer ceci :

SI ( le texte de A1 = bleu;
Alors (cellule = A1 mais texte en rouge))


Après j'aurais besoin de faire les sommes de mes chiffres
rouge et blue

Merci de votre aide


.



Avatar
Dédé
Merci à vous deux pour votre gratitude !

Comme le disais Eric, pour entrer dans le code VBA d'une feuille Excel, il
faut soit, cliquer droit sur l'onglet d'une feuille et sélectionner
"Visualiser le code" soit, ALT + F11.

Ensuite, si c'est une code lié à la feuille de calcul, il faut ouvrir une de
ces feuille et faire la sélection en haut pour savoir sur quel événement va
se dérouler le code ...

J'espère que ce début pourra mettre Kevin sur une bonne voie ..;-))

Si des questions, tu a encore, ben tu peux toujours venir les poser ici et
réponse tu trouvera !

Salutations !
Dédé

"Eric" a écrit dans le message de
news:Oaad$
Bonsoir Kevin,

Pour utiliser cette macro tu la copies dans le code de la feuille (Clic
droit sur l'onglet de la feuille/Visualiser le code) tu la colles ici.
Elle

devrait s'executer toute seul à chaques changement dans la feuille.

Bon courage, et surtout merci à Dédé

Eric

"Kevin" a écrit dans le message de news:
091201c34a16$ec9d8cf0$
Merci pour ce merveilleux code VB.

J'ai fait un peu de VB donc la compréhention est bonne mais
par contre je députe sur Excel (en tout cas a ce niveau ;-)

Comment je fais pour crée cette macro et comment je fait
pour l'utilisé??

Si t'arrive a me rafréchir la mémoire pour la premiere
ligne ca serait très sympatique.

encore merci

Kevin
-----Message d'origine-----
Salut Kevin !

Ben j'ai fais une petite macro pour te faire tout ça ...

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("a1").Font.ColorIndex = 5 Then
Range("b1").Font.ColorIndex = 3
Range("c1").Value = [a1] + [B1]
Else
Range("c1").Value = ""
Range("A1:B1").Font.ColorIndex = 1
End If
End Sub

Est-ce que cela te convient ?

Salutations
Dédé
"Kevin" a écrit dans le message de
news:084501c349fd$51c1e140$
Bonjours,

Je cherche une formule pour exprimer ceci :

SI ( le texte de A1 = bleu;
Alors (cellule = A1 mais texte en rouge))


Après j'aurais besoin de faire les sommes de mes chiffres
rouge et blue

Merci de votre aide


.