Mise en forme conditionnelle Excel 2007 : Formula1

[vesch]

Bonjour à tous,

Sujet : Mise en forme conditionnelle Excel 2007
Problème : Vérification des formules des différents ITEM de MeFC d’une même plage de cellules.

Je dois vérifier les MeFC appliquées sur une cellule.

J’arrive à lister les valeurs des différents ITEM de ma MeFC sauf pour « .Formula1 » qui me donne toujours la même formule quelque soit l’item.

Le but final étant de savoir exactement ce qui est présent dans les formules des 3 conditions.

Merci à vous :=)

Voici le code :

'3 Conditions différentes sont sur la cellule B2
'$C$35=0
'$C$35=1
'$C$35=2
Dim Mfc As FormatCondition
For NbMeFC = 1 To Range("B2").FormatConditions.Count 
        Set Mfc = Range("B2").FormatConditions(NbMeFC)
            With Mfc
                If .Formula1 = "=$C$35=0" Then V_Val24 = 1 
                If .Interior.ColorIndex <> 43 And .Interior.ColorIndex <> 14 Then V_Val25 = 1 
         End With
Next

 

[Kobaya]

Re : Mise en forme conditionnelle Excel 2007 : Formula1

bonjour vesch,

Ca ne fonctionne pas parce que tu n'utilises pas la bonne boucle For/Next.

Essaie ceci :

'3 Conditions différentes sont sur la cellule B2
'$C$35=0
'$C$35=1
'$C$35=2
Dim Mfc As FormatCondition

For Each Mfc In Range("B2").FormatConditions
    With Mfc
        Debug.Print "Formula1=" & .Formula1, "Priority=" & .Priority, "AppliesTo=" & .AppliesTo.Address
        If .Formula1 = "=$C$35=0" Then V_Val24 = 1
        If .Interior.ColorIndex <> 43 And .Interior.ColorIndex <> 14 Then V_Val25 = 1
    End With
Next

 

[vesch]

Re : Mise en forme conditionnelle Excel 2007 : Formula1

Merci Kobaya
Impeccable, je peux continuer
Encore merci

 

[vesch]

Re : Mise en forme conditionnelle Excel 2007 : Formula1

AÏE, j’ai crié victoire trop vite.
En fait mon exemple est incomplet.
Ton code fonctionne très bien mais si je défini des plages de cellules différentes, je retombe sur mon problème initial.
Voici un petit fichier pour mieux voir la chose.

 

[Kobaya]

Re : Mise en forme conditionnelle Excel 2007 : Formula1

hello,

Il faut certainement jongler avec les références de cellules absolues/relatives ($A$1, $A1, A$1, A1). Mais il faudrait un exemple un peu plus complet si possible, car je n'arrive pas à voir ce que tu veux faire.