Bjr,lors d'1 demande mise en forme conditionnelle,est il possible de changer
la taille de la police lorsque l'on demande déjà , par exemple, a ce que la
cellule passe rouge si valeure négative?
Merci de votre aide. TAILLE Police à l'air figé
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
garnote
Salut Fan,
Un exemple opérant sur la plage A1:C10 et ne nécessisant pas de mise en forme conditionnelle. Très largement inspiré d'une macro récente de LSteph :
Private Sub Worksheet_Change(ByVal Target As Range) Dim iSect As Range, c As Range Set iSect = Intersect(Target, [a1:c10]) If iSect Is Nothing Then Exit Sub Application.EnableEvents = False For Each c In iSect If IsNumeric(c) And c < 0 Then c.Font.Size = 15 c.Font.ColorIndex = 3 End If Next Application.EnableEvents = True End Sub
Serge
"Fan" a écrit dans le message de news:
Bjr,lors d'1 demande mise en forme conditionnelle,est il possible de changer la taille de la police lorsque l'on demande déjà , par exemple, a ce que la cellule passe rouge si valeure négative? Merci de votre aide. TAILLE Police à l'air figé
Salut Fan,
Un exemple opérant sur la plage A1:C10 et ne
nécessisant pas de mise en forme conditionnelle.
Très largement inspiré d'une macro récente de LSteph :
Private Sub Worksheet_Change(ByVal Target As Range)
Dim iSect As Range, c As Range
Set iSect = Intersect(Target, [a1:c10])
If iSect Is Nothing Then Exit Sub
Application.EnableEvents = False
For Each c In iSect
If IsNumeric(c) And c < 0 Then
c.Font.Size = 15
c.Font.ColorIndex = 3
End If
Next
Application.EnableEvents = True
End Sub
Serge
"Fan" <Fan@discussions.microsoft.com> a écrit dans le message de news: 271224E1-139B-4FFF-B593-F420A30438FD@microsoft.com...
Bjr,lors d'1 demande mise en forme conditionnelle,est il possible de changer
la taille de la police lorsque l'on demande déjà , par exemple, a ce que la
cellule passe rouge si valeure négative?
Merci de votre aide. TAILLE Police à l'air figé
Un exemple opérant sur la plage A1:C10 et ne nécessisant pas de mise en forme conditionnelle. Très largement inspiré d'une macro récente de LSteph :
Private Sub Worksheet_Change(ByVal Target As Range) Dim iSect As Range, c As Range Set iSect = Intersect(Target, [a1:c10]) If iSect Is Nothing Then Exit Sub Application.EnableEvents = False For Each c In iSect If IsNumeric(c) And c < 0 Then c.Font.Size = 15 c.Font.ColorIndex = 3 End If Next Application.EnableEvents = True End Sub
Serge
"Fan" a écrit dans le message de news:
Bjr,lors d'1 demande mise en forme conditionnelle,est il possible de changer la taille de la police lorsque l'on demande déjà , par exemple, a ce que la cellule passe rouge si valeure négative? Merci de votre aide. TAILLE Police à l'air figé
Quetzalcoatl
Bonjour,
Je pense qu'il faudarit que tu précises quelle version d'EXCEL tu utilises. Pour ma part, avec EXCEL 97 :-) je ne peux modifier que le style et la couleur de police, le soulignement, les bordures, l'ombrage ou les motifs. Je ne peux pas modifier la police ni sa taille (et ce sans rapport avec une éventuelle demande de mise en forme d'un autre type, comme le choix de la couleur).
"Fan" a écrit dans le message de news:
Bjr,lors d'1 demande mise en forme conditionnelle,est il possible de changer la taille de la police lorsque l'on demande déjà , par exemple, a ce que la cellule passe rouge si valeure négative? Merci de votre aide. TAILLE Police à l'air figé
Bonjour,
Je pense qu'il faudarit que tu précises quelle version d'EXCEL tu utilises.
Pour ma part, avec EXCEL 97 :-)
je ne peux modifier que le style et la couleur de police, le soulignement, les bordures, l'ombrage ou les motifs.
Je ne peux pas modifier la police ni sa taille (et ce sans rapport avec une éventuelle demande de mise en forme d'un autre type,
comme le choix de la couleur).
"Fan" <Fan@discussions.microsoft.com> a écrit dans le message de news: 271224E1-139B-4FFF-B593-F420A30438FD@microsoft.com...
Bjr,lors d'1 demande mise en forme conditionnelle,est il possible de changer
la taille de la police lorsque l'on demande déjà , par exemple, a ce que la
cellule passe rouge si valeure négative?
Merci de votre aide. TAILLE Police à l'air figé
Je pense qu'il faudarit que tu précises quelle version d'EXCEL tu utilises. Pour ma part, avec EXCEL 97 :-) je ne peux modifier que le style et la couleur de police, le soulignement, les bordures, l'ombrage ou les motifs. Je ne peux pas modifier la police ni sa taille (et ce sans rapport avec une éventuelle demande de mise en forme d'un autre type, comme le choix de la couleur).
"Fan" a écrit dans le message de news:
Bjr,lors d'1 demande mise en forme conditionnelle,est il possible de changer la taille de la police lorsque l'on demande déjà , par exemple, a ce que la cellule passe rouge si valeure négative? Merci de votre aide. TAILLE Police à l'air figé
Jacky
Bonjour, A ma connaissance, la police et la taille ne sont pas modifiable dans une Mise en forme conditionnelle, du moins jusqu'a la version xl2003, peut-être 2007 Pour mettre en rouge: Condition 1 La valeur de la cellule est==> inferieure à ==> 0 Format etc...
Sinon par macro -- Salutations JJ
"Fan" a écrit dans le message de news:
Bjr,lors d'1 demande mise en forme conditionnelle,est il possible de changer la taille de la police lorsque l'on demande déjà , par exemple, a ce que la cellule passe rouge si valeure négative? Merci de votre aide. TAILLE Police à l'air figé
Bonjour,
A ma connaissance, la police et la taille ne sont pas modifiable dans une
Mise en forme conditionnelle, du moins jusqu'a la version xl2003, peut-être
2007
Pour mettre en rouge:
Condition 1
La valeur de la cellule est==> inferieure à ==> 0
Format etc...
Sinon par macro
--
Salutations
JJ
"Fan" <Fan@discussions.microsoft.com> a écrit dans le message de news:
271224E1-139B-4FFF-B593-F420A30438FD@microsoft.com...
Bjr,lors d'1 demande mise en forme conditionnelle,est il possible de
changer
la taille de la police lorsque l'on demande déjà , par exemple, a ce que
la
cellule passe rouge si valeure négative?
Merci de votre aide. TAILLE Police à l'air figé
Bonjour, A ma connaissance, la police et la taille ne sont pas modifiable dans une Mise en forme conditionnelle, du moins jusqu'a la version xl2003, peut-être 2007 Pour mettre en rouge: Condition 1 La valeur de la cellule est==> inferieure à ==> 0 Format etc...
Sinon par macro -- Salutations JJ
"Fan" a écrit dans le message de news:
Bjr,lors d'1 demande mise en forme conditionnelle,est il possible de changer la taille de la police lorsque l'on demande déjà , par exemple, a ce que la cellule passe rouge si valeure négative? Merci de votre aide. TAILLE Police à l'air figé
garnote
Toutes mes excuses. Il y a un bogue dans la macro que je ne sais pas annihiler ;-(
Serge
"garnote" a écrit dans le message de news: %
Salut Fan,
Un exemple opérant sur la plage A1:C10 et ne nécessisant pas de mise en forme conditionnelle. Très largement inspiré d'une macro récente de LSteph :
Private Sub Worksheet_Change(ByVal Target As Range) Dim iSect As Range, c As Range Set iSect = Intersect(Target, [a1:c10]) If iSect Is Nothing Then Exit Sub Application.EnableEvents = False For Each c In iSect If IsNumeric(c) And c < 0 Then c.Font.Size = 15 c.Font.ColorIndex = 3 End If Next Application.EnableEvents = True End Sub
Serge
"Fan" a écrit dans le message de news:
Bjr,lors d'1 demande mise en forme conditionnelle,est il possible de changer la taille de la police lorsque l'on demande déjà , par exemple, a ce que la cellule passe rouge si valeure négative? Merci de votre aide. TAILLE Police à l'air figé
Toutes mes excuses. Il y a un bogue dans la macro que je ne sais pas annihiler ;-(
Serge
"garnote" <garnote3@ENLEVER.videotron.ca> a écrit dans le message de news: %23VKGMKRoHHA.1476@TK2MSFTNGP03.phx.gbl...
Salut Fan,
Un exemple opérant sur la plage A1:C10 et ne
nécessisant pas de mise en forme conditionnelle.
Très largement inspiré d'une macro récente de LSteph :
Private Sub Worksheet_Change(ByVal Target As Range)
Dim iSect As Range, c As Range
Set iSect = Intersect(Target, [a1:c10])
If iSect Is Nothing Then Exit Sub
Application.EnableEvents = False
For Each c In iSect
If IsNumeric(c) And c < 0 Then
c.Font.Size = 15
c.Font.ColorIndex = 3
End If
Next
Application.EnableEvents = True
End Sub
Serge
"Fan" <Fan@discussions.microsoft.com> a écrit dans le message de news: 271224E1-139B-4FFF-B593-F420A30438FD@microsoft.com...
Bjr,lors d'1 demande mise en forme conditionnelle,est il possible de changer
la taille de la police lorsque l'on demande déjà , par exemple, a ce que la
cellule passe rouge si valeure négative?
Merci de votre aide. TAILLE Police à l'air figé
Toutes mes excuses. Il y a un bogue dans la macro que je ne sais pas annihiler ;-(
Serge
"garnote" a écrit dans le message de news: %
Salut Fan,
Un exemple opérant sur la plage A1:C10 et ne nécessisant pas de mise en forme conditionnelle. Très largement inspiré d'une macro récente de LSteph :
Private Sub Worksheet_Change(ByVal Target As Range) Dim iSect As Range, c As Range Set iSect = Intersect(Target, [a1:c10]) If iSect Is Nothing Then Exit Sub Application.EnableEvents = False For Each c In iSect If IsNumeric(c) And c < 0 Then c.Font.Size = 15 c.Font.ColorIndex = 3 End If Next Application.EnableEvents = True End Sub
Serge
"Fan" a écrit dans le message de news:
Bjr,lors d'1 demande mise en forme conditionnelle,est il possible de changer la taille de la police lorsque l'on demande déjà , par exemple, a ce que la cellule passe rouge si valeure négative? Merci de votre aide. TAILLE Police à l'air figé
Jacky
Bonjour,
....Il y a un bogue dans la macro que je ne sais pas annihiler ;-( Pas de problème avec cette macro.
Essaie: Ferme xl et recommence.
-- Salutations JJ
"garnote" a écrit dans le message de news:
Toutes mes excuses. Il y a un bogue dans la macro que je ne sais pas annihiler ;-(
Serge
"garnote" a écrit dans le message de news: %
Salut Fan,
Un exemple opérant sur la plage A1:C10 et ne nécessisant pas de mise en forme conditionnelle. Très largement inspiré d'une macro récente de LSteph :
Private Sub Worksheet_Change(ByVal Target As Range) Dim iSect As Range, c As Range Set iSect = Intersect(Target, [a1:c10]) If iSect Is Nothing Then Exit Sub Application.EnableEvents = False For Each c In iSect If IsNumeric(c) And c < 0 Then c.Font.Size = 15 c.Font.ColorIndex = 3 End If Next Application.EnableEvents = True End Sub
Serge
"Fan" a écrit dans le message de news:
Bjr,lors d'1 demande mise en forme conditionnelle,est il possible de changer la taille de la police lorsque l'on demande déjà , par exemple, a ce que la cellule passe rouge si valeure négative? Merci de votre aide. TAILLE Police à l'air figé
Bonjour,
....Il y a un bogue dans la macro que je ne sais pas annihiler ;-(
Pas de problème avec cette macro.
Essaie:
Ferme xl et recommence.
--
Salutations
JJ
"garnote" <garnote3@ENLEVER.videotron.ca> a écrit dans le message de news:
ObYWwURoHHA.4552@TK2MSFTNGP04.phx.gbl...
Toutes mes excuses. Il y a un bogue dans la macro que je ne sais pas
annihiler ;-(
Serge
"garnote" <garnote3@ENLEVER.videotron.ca> a écrit dans le message de news:
%23VKGMKRoHHA.1476@TK2MSFTNGP03.phx.gbl...
Salut Fan,
Un exemple opérant sur la plage A1:C10 et ne
nécessisant pas de mise en forme conditionnelle.
Très largement inspiré d'une macro récente de LSteph :
Private Sub Worksheet_Change(ByVal Target As Range)
Dim iSect As Range, c As Range
Set iSect = Intersect(Target, [a1:c10])
If iSect Is Nothing Then Exit Sub
Application.EnableEvents = False
For Each c In iSect
If IsNumeric(c) And c < 0 Then
c.Font.Size = 15
c.Font.ColorIndex = 3
End If
Next
Application.EnableEvents = True
End Sub
Serge
"Fan" <Fan@discussions.microsoft.com> a écrit dans le message de news:
271224E1-139B-4FFF-B593-F420A30438FD@microsoft.com...
Bjr,lors d'1 demande mise en forme conditionnelle,est il possible de
changer
la taille de la police lorsque l'on demande déjà , par exemple, a ce que
la
cellule passe rouge si valeure négative?
Merci de votre aide. TAILLE Police à l'air figé
....Il y a un bogue dans la macro que je ne sais pas annihiler ;-( Pas de problème avec cette macro.
Essaie: Ferme xl et recommence.
-- Salutations JJ
"garnote" a écrit dans le message de news:
Toutes mes excuses. Il y a un bogue dans la macro que je ne sais pas annihiler ;-(
Serge
"garnote" a écrit dans le message de news: %
Salut Fan,
Un exemple opérant sur la plage A1:C10 et ne nécessisant pas de mise en forme conditionnelle. Très largement inspiré d'une macro récente de LSteph :
Private Sub Worksheet_Change(ByVal Target As Range) Dim iSect As Range, c As Range Set iSect = Intersect(Target, [a1:c10]) If iSect Is Nothing Then Exit Sub Application.EnableEvents = False For Each c In iSect If IsNumeric(c) And c < 0 Then c.Font.Size = 15 c.Font.ColorIndex = 3 End If Next Application.EnableEvents = True End Sub
Serge
"Fan" a écrit dans le message de news:
Bjr,lors d'1 demande mise en forme conditionnelle,est il possible de changer la taille de la police lorsque l'on demande déjà , par exemple, a ce que la cellule passe rouge si valeure négative? Merci de votre aide. TAILLE Police à l'air figé
Patrick BASTARD
Bonjour, *Fan*
Sans VBA, avec macro complémentaire : Ce .XLA permet d'appliquer jusqu'à 30 formats conditionnels, y compris les tailles des caractères et autres joyeusetés (format de nombres entre autres, si je me souviens bien) http://www.xldynamic.com/source/xld.CFPlus.Download.html Mais, hélas, au revoir la portabilité...
-- Bien amicordialement, P. Bastard
Avant d'imprimer ce mail, ayez une pensée pour les arbres.
Bjr,lors d'1 demande mise en forme conditionnelle,est il possible de changer la taille de la police lorsque l'on demande déjà , par exemple, a ce que la cellule passe rouge si valeure négative? Merci de votre aide. TAILLE Police à l'air figé
Bonjour, *Fan*
Sans VBA, avec macro complémentaire :
Ce .XLA permet d'appliquer jusqu'à 30 formats conditionnels, y compris les
tailles des caractères et autres joyeusetés (format de nombres entre autres,
si je me souviens bien)
http://www.xldynamic.com/source/xld.CFPlus.Download.html
Mais, hélas, au revoir la portabilité...
--
Bien amicordialement,
P. Bastard
Avant d'imprimer ce mail, ayez une pensée pour les arbres.
Bjr,lors d'1 demande mise en forme conditionnelle,est il possible de
changer la taille de la police lorsque l'on demande déjà , par
exemple, a ce que la cellule passe rouge si valeure négative?
Merci de votre aide. TAILLE Police à l'air figé
Sans VBA, avec macro complémentaire : Ce .XLA permet d'appliquer jusqu'à 30 formats conditionnels, y compris les tailles des caractères et autres joyeusetés (format de nombres entre autres, si je me souviens bien) http://www.xldynamic.com/source/xld.CFPlus.Download.html Mais, hélas, au revoir la portabilité...
-- Bien amicordialement, P. Bastard
Avant d'imprimer ce mail, ayez une pensée pour les arbres.
Bjr,lors d'1 demande mise en forme conditionnelle,est il possible de changer la taille de la police lorsque l'on demande déjà , par exemple, a ce que la cellule passe rouge si valeure négative? Merci de votre aide. TAILLE Police à l'air figé