Mise en forme Conditionnelle

[usul3]

Bonjour tout le monde et bonne année,
Longue vie au forum

Mon problème est le suivant: lorsque je définis la Mise en forme conditionnelle des cellules via un code VBA, ça ne marche pas !!! Pourtant quand j'entre les conditions "manuellement" ça tourne bien...

Voici le code :

Code :

1
2
3
4
5
6
7
code = 64 + n
Cells(m, n).FormatConditions.Add Type:=xlExpression, Formula1:="ET(" & Chr(code) & "18>=C" & m & ";" & Chr(code) & "18<=D" & m & ")"
Selection.FormatConditions(1).Font.ColorIndex = 1
With Selection.FormatConditions(1).Interior
              .ColorIndex = 35
              .Pattern = xlSolid
End With

pourriez vous m'aider ????? svp

[ZebreLoup]

Je ne suis pas sûr, mais il me semble qu'il faut que tu entres les formules avec une syntaxe Anglo-Saxonne.

Et tu utilises Selection au lieu de Cells(m, n) pour la mise en forme

[usul3]

Merci pour ta réponse, j'ai essayé Selection au lieu de Cells(m,n) mais ce n'est pas mieux qu'avant...
Qu'est ce que c'est la syntaxe anglo-saxonne ?? je ne vois pas trop ce que ça peut être...

Merci encore

[ZebreLoup]

Après vérification j'ai dis une bêtise pour la syntaxe anglosaxonne. C'est seulement quand tu touches à la propriété Formula d'un range, plutôt que FormulaLocal. Il aurait fallu mettre un AND au lieu d'un ET et des virgules au lieu des points-virgules, mais ça n'est pas le cas ici.

Et sinon, je te conseillais l'inverse, utiliser Cells(m, n) là où tu avais mis Selection. Car sinon, tu ajoutes une MFC à la cellules m,n, et tu choisis la couleur pour la cellule active, qui n'est pas forcément celle-là...

[ZebreLoup]

Essaie de cette façon :

Code :

1
2
3
4
5
6
7
8
9
Cells(m, n).FormatConditions.Add Type:=xlExpression, _
    Formula1:="=ET(" & Cells(18, n).Address & ">=" & Cells(m, "C").Address & _
    ";" & Cells(18, n).Address & "<=" & Cells(m, "D").Address & ")"
 
With Cells(m, n).FormatConditions(1)
    .Font.ColorIndex = 1
    .Interior.ColorIndex = 35
    .Interior.Pattern = xlSolid
End With

Ça t'évite de passer par le code ASCII