Mise en forme conditionnelle selon critères Min & Max

Bonjour à tous,

Tout d'abord merci pour ce forum qui apporte une aide si précieuse

Voilà mon problème:

je souhaite, dans un tableau croisé dynamique, Afficher en vert le valeure la plus haute par ligne et au contraire la valeur la plus basse.

https://www.excel-pratique.com/~files/doc2/Min_Max.xls

En espérant avoir été clair ...

Bonne journée

oSMoZ

Salut oSMoZ

Quelque chose dans le genre pourrait convenir ?

https://www.excel-pratique.com/~files/doc2/Min_Max_y.xls

Bonne soirée

Bonjour yvouille, forum

Je ne connais pas ce menu sous excel 2003 . Il a l'air très pratique pour les mise en forme !!!

Peux-tu m'indiquer comment on y accède, je ne suis pas qu'il existe en version 2003....??

En tout cas merci pour la réponse.

Bonne journée

oSMoZ

Bonjour,

La solution du Y_vouille est bien si tu n'as pas de TCD et que tes lignes et colonnes ne bougent pas.

Dans le cas d'un TCD, dès que tu remettras à jour, la mise en forme conditionnelle ne sera pas réactualisée si tu as plus de lignes (plus de semaines) et plus de colonnes (plus de Resp) à traiter

Dans ce cas, tu ne peux faire cela que pas code.

Peux tu me confirmer que ton TCD démarre toujours en cellule A3 dans ton fichier original ?

Amicalement

Dan

Bonjour Dan,

Dans mon fichier original, le TCD débute en C2.

Le problème, c'est que le langage VBA est une chose qui m'est totalement inconnu....

J'aurais deux autres questions:

• Le menu de mise en forme que m'a montré Yvouille existe -t-il sous la version 2003 ?
• Connaitrais-tu un lien qui puisse m'initier au langage VBA ?

Merci bcp bcp ce forum est génialissime .....

Seulement 15 jours que je suis inscrit et je découvre des fonctionnalités Excel à chaque visite !!!!

Bonne journée

oSMoZ

re,

Dans mon fichier original, le TCD débute en C2.

Je considère que "Somme de champ 1" se trouve donc en C2. Merci de confirmer

Le menu de mise en forme que m'a montré Yvouille existe -t-il sous la version 2003 ?

Je pense qu'il s'agit d'excel 2007. A vérifier toutefois.

Merci de me dire quel est le nom exact de TCD. Pour le voir, clique droite dans le TCD puis vas dans "option du tableau" et tu trouveras le nom du TCD en haut à gauche.

A te relire

Dan

Re,

Je confirme bien le début du TCD en C2.

Le nom du TCD :

rendement equipe (sans accent sur equipe).

Merci

oSMoZ[/quote]

re,

Voici un petit code qui va te faire ce que tu demandes

1. Suis ces indications :

• ALT + F11 sur ton clavier pour aller en VBA
• Menu Insertion / Module qui va te donner une fenêtre blanche à droite
• Colle le code ci-dessous

Const lig As Byte = 3
Sub MFC()
' Macro Dan pour oSMoZ le 06/08/09
'http://www.excel-pratique.com/forum/viewtopic.php?t=12687
Dim a As Byte, b As Byte, col As Byte
Dim imin, imax
Application.ScreenUpdating = False
ActiveSheet.PivotTables("rendement equipe").PivotSelect ("Resp"), xlDataOnly
With Selection.Font
    .ColorIndex = 0
    .Bold = False
End With
b = Selection.Columns.Count
On Error Resume Next
For a = 1 To Selection.Rows.Count
With Application.WorksheetFunction
    imin = .Min(Range(Cells(a + lig, 5), Cells(a + lig, b + 4)))
    If imin <> 0 Then
    col = .Match(imin, Range(Cells(a + lig, 5), Cells(a + lig, b + 4)), 0)
        With Cells(a + lig, col + 4).Font
            .ColorIndex = 3
            .Bold = True
        End With
    End If
End With
With Application.WorksheetFunction
    imax = .Max(Range(Cells(a + lig, 5), Cells(a + lig, b + 4)))
    If imax <> 0 Then
        col = .Match(imax, Range(Cells(a + lig, 5), Cells(a + lig, b + 4)), 0)
        With Cells(a + lig, col + 4).Font
            .ColorIndex = 10
            .Bold = True
        End With
    End If
End With
Next
Range("A1").Select
End Sub

- Enregistre ton fichier

2. Ensuite :

• Clique droite sur l'onglet où se trouve le TCD
• Choisis "Visualiser le code"
• Colle le code ci-après

Private Sub Worksheet_Activate()
Call MFC
End Sub

- Enregistre ton fichier

Pour faire un essai, clique sur un onglet autre que celui du TCD, puis clique à nouveau sur l'onglet contenant le TCD.

Tes macros doivent activées dans excel. Pour le faire, vas dans Outils / Macro / sécurité des macros puis mets sur "niveau moyen".

Amicalement

Dan

Re,

je ne vais pas avoir le temps de tester le code aujourd'hui,

Je te tiens au courant demain.

Merci et bonne fin de journée

oSMoZ

Bonjour Dan,

Cela fonctionne bien,

Merci de m'avoir accordé de ton temps

bonne journée

oSMoZ