Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel police en rouge si plus petitque 2

police en rouge si plus petitque 2

20 réponses
Avatar
Daniel
Bonsoir à tous

Comment faire pour mettre la police en rouge (dans une macro)
si les nombres est 2 ou 1 .

merci
Signaler un problème avec ce contenu

10 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
1 2
Avatar
papou
Bonjour
Sans autres précisions :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Value <> 0 And Target.Value <= 2 Then
Target.Font.ColorIndex = 3
Else: Target.Font.ColorIndex = 0
End If
End Sub

Code à placer dans la feuille
Cordialement
Pascal

"Daniel" a écrit dans le message de
news:y7Aid.286$
Bonsoir à tous

Comment faire pour mettre la police en rouge (dans une macro)
si les nombres est 2 ou 1 .

merci




Avatar
ru-th
c'est bien, tu sais compter jusqu'à 3 !
;-))
a+
rural thierry
"sabatier" a écrit dans le message
de news:
bonjour
bien que l'objet de ton post ne veuille pas dire la même chose que le
corps

de celui-ci, je te propose cela :

Sub zzzz()
If ActiveCell.Value = 2 Or ActiveCell.Value = 1 Then
ActiveCell.Font.ColorIndex = 3

End Sub

HTH
jps
PS le zzzz n'est pas de moi, le reste oui et ça se voit....

"Daniel" a écrit dans le message de
news:y7Aid.286$
Bonsoir à tous

Comment faire pour mettre la police en rouge (dans une macro)
si les nombres est 2 ou 1 .

merci








Avatar
sabatier
bonjour
bien que l'objet de ton post ne veuille pas dire la même chose que le corps
de celui-ci, je te propose cela :

Sub zzzz()
If ActiveCell.Value = 2 Or ActiveCell.Value = 1 Then
ActiveCell.Font.ColorIndex = 3

End Sub

HTH
jps
PS le zzzz n'est pas de moi, le reste oui et ça se voit....

"Daniel" a écrit dans le message de
news:y7Aid.286$
Bonsoir à tous

Comment faire pour mettre la police en rouge (dans une macro)
si les nombres est 2 ou 1 .

merci




Avatar
sabatier
et si la valeur est - 3, papou, what will happen then?
bon, attendons que daniel se réveille pour savoir si c'était le titre ou le
corps qui était à considérer
bonne journée nonobstant
jps

"papou" a écrit dans le message de
news:
Bonjour
Sans autres précisions :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Value <> 0 And Target.Value <= 2 Then
Target.Font.ColorIndex = 3
Else: Target.Font.ColorIndex = 0
End If
End Sub

Code à placer dans la feuille
Cordialement
Pascal

"Daniel" a écrit dans le message de
news:y7Aid.286$
Bonsoir à tous

Comment faire pour mettre la police en rouge (dans une macro)
si les nombres est 2 ou 1 .

merci








Avatar
papou
Bonjour Jean Paul
Oui c'est exact, il y a une erreur donc je corrige :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Value > 0 And Target.Value <= 2 Then
Target.Font.ColorIndex = 3
Else: Target.Font.ColorIndex = 0
End If
End Sub
Cordialement


Pascal

"sabatier" a écrit dans le message
de news:
et si la valeur est - 3, papou, what will happen then?
bon, attendons que daniel se réveille pour savoir si c'était le titre ou
le

corps qui était à considérer
bonne journée nonobstant
jps

"papou" a écrit dans le message de
news:
Bonjour
Sans autres précisions :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Value <> 0 And Target.Value <= 2 Then
Target.Font.ColorIndex = 3
Else: Target.Font.ColorIndex = 0
End If
End Sub

Code à placer dans la feuille
Cordialement
Pascal

"Daniel" a écrit dans le message de
news:y7Aid.286$
Bonsoir à tous

Comment faire pour mettre la police en rouge (dans une macro)
si les nombres est 2 ou 1 .

merci












Avatar
Misange
Si c'est un shadok, vaut mieux qu'il s'arrête là : à 4 il pond un oeuf !
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta


on 05/11/2004 08:37:
c'est bien, tu sais compter jusqu'à 3 !
;-))
a+
rural thierry
"sabatier" a écrit dans le message
de news:

bonjour
bien que l'objet de ton post ne veuille pas dire la même chose que le


corps

de celui-ci, je te propose cela :

Sub zzzz()
If ActiveCell.Value = 2 Or ActiveCell.Value = 1 Then
ActiveCell.Font.ColorIndex = 3

End Sub

HTH
jps
PS le zzzz n'est pas de moi, le reste oui et ça se voit....

"Daniel" a écrit dans le message de
news:y7Aid.286$

Bonsoir à tous

Comment faire pour mettre la police en rouge (dans une macro)
si les nombres est 2 ou 1 .

merci












Avatar
jps
mais écoutez-moi cette horde de scudeurs qui me traquent jusque dans mes
calculs les plus complexes...
jps

"Misange" a écrit dans le message de
news:eu$
Si c'est un shadok, vaut mieux qu'il s'arrête là : à 4 il pond un oeuf !
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta


on 05/11/2004 08:37:
c'est bien, tu sais compter jusqu'à 3 !
;-))
a+
rural thierry
"sabatier" a écrit dans le
message


de news:

bonjour
bien que l'objet de ton post ne veuille pas dire la même chose que le


corps

de celui-ci, je te propose cela :

Sub zzzz()
If ActiveCell.Value = 2 Or ActiveCell.Value = 1 Then
ActiveCell.Font.ColorIndex = 3

End Sub

HTH
jps
PS le zzzz n'est pas de moi, le reste oui et ça se voit....

"Daniel" a écrit dans le message de
news:y7Aid.286$

Bonsoir à tous

Comment faire pour mettre la police en rouge (dans une macro)
si les nombres est 2 ou 1 .

merci














Avatar
twinley
mais non, jps, mais non

si tout le monde pouvait donner son avis... à ton sujet, tu serais
(agréablement) surpris.

www.betavote.com

--
à+twinley
"jps" a écrit dans le message de
news:
mais écoutez-moi cette horde de scudeurs qui me traquent jusque dans mes
calculs les plus complexes...
jps

"Misange" a écrit dans le message de
news:eu$
Si c'est un shadok, vaut mieux qu'il s'arrête là : à 4 il pond un oeuf !
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta


on 05/11/2004 08:37:
c'est bien, tu sais compter jusqu'à 3 !
;-))
a+
rural thierry
"sabatier" a écrit dans le
message


de news:

bonjour
bien que l'objet de ton post ne veuille pas dire la même chose que le


corps

de celui-ci, je te propose cela :

Sub zzzz()
If ActiveCell.Value = 2 Or ActiveCell.Value = 1 Then
ActiveCell.Font.ColorIndex = 3

End Sub

HTH
jps
PS le zzzz n'est pas de moi, le reste oui et ça se voit....

"Daniel" a écrit dans le message de
news:y7Aid.286$

Bonsoir à tous

Comment faire pour mettre la police en rouge (dans une macro)
si les nombres est 2 ou 1 .

merci


















Avatar
jps
:-))))))))))))
ne manque que les stats du beaujolais dans ce truc trop marrant, twinley
jps

"twinley" <twinleym(at)hotmail.com> a écrit dans le message de
news:%23j$
mais non, jps, mais non

si tout le monde pouvait donner son avis... à ton sujet, tu serais
(agréablement) surpris.

www.betavote.com

--
à+twinley
"jps" a écrit dans le message de
news:
mais écoutez-moi cette horde de scudeurs qui me traquent jusque dans mes
calculs les plus complexes...
jps

"Misange" a écrit dans le message de
news:eu$
Si c'est un shadok, vaut mieux qu'il s'arrête là : à 4 il pond un oeuf
!



Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta


on 05/11/2004 08:37:
c'est bien, tu sais compter jusqu'à 3 !
;-))
a+
rural thierry
"sabatier" a écrit dans le
message


de news:

bonjour
bien que l'objet de ton post ne veuille pas dire la même chose que
le






corps

de celui-ci, je te propose cela :

Sub zzzz()
If ActiveCell.Value = 2 Or ActiveCell.Value = 1 Then
ActiveCell.Font.ColorIndex = 3

End Sub

HTH
jps
PS le zzzz n'est pas de moi, le reste oui et ça se voit....

"Daniel" a écrit dans le message de
news:y7Aid.286$

Bonsoir à tous

Comment faire pour mettre la police en rouge (dans une macro)
si les nombres est 2 ou 1 .

merci






















Avatar
twinley
tout à fait de ton avis.
Quand on voit que les trois pékins de l'Antarctique donnent leur avis, ne
pas inclure le beaujolais est une faute de goût. Absolument.

--
à+twinley
"jps" a écrit dans le message de
news:
:-))))))))))))
ne manque que les stats du beaujolais dans ce truc trop marrant, twinley
jps

"twinley" <twinleym(at)hotmail.com> a écrit dans le message de
news:%23j$
mais non, jps, mais non

si tout le monde pouvait donner son avis... à ton sujet, tu serais
(agréablement) surpris.

www.betavote.com

--
à+twinley
"jps" a écrit dans le message de
news:
mais écoutez-moi cette horde de scudeurs qui me traquent jusque dans
mes



calculs les plus complexes...
jps

"Misange" a écrit dans le message de
news:eu$
Si c'est un shadok, vaut mieux qu'il s'arrête là : à 4 il pond un
oeuf




!
Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta


on 05/11/2004 08:37:
c'est bien, tu sais compter jusqu'à 3 !
;-))
a+
rural thierry
"sabatier" a écrit dans
le





message
de news:

bonjour
bien que l'objet de ton post ne veuille pas dire la même chose que
le






corps

de celui-ci, je te propose cela :

Sub zzzz()
If ActiveCell.Value = 2 Or ActiveCell.Value = 1 Then
ActiveCell.Font.ColorIndex = 3

End Sub

HTH
jps
PS le zzzz n'est pas de moi, le reste oui et ça se voit....

"Daniel" a écrit dans le message de
news:y7Aid.286$

Bonsoir à tous

Comment faire pour mettre la police en rouge (dans une macro)
si les nombres est 2 ou 1 .

merci


























1 2