Discussion :

[patanar]

bonjour,

j'ai un gros souci, je voudrai faire une mise en forme conditionnelle en vba, pour cela je me suis inspiré du code généré par l'enregistrement macro, sauf que dans ce code les cellules sont en références absolus et que je voudrais des références relatives.
Je ne trouve pas comment adapter ce code, c'est le B3 qui coince!!!

Merci de votre aide

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
Sub Macro2()
    Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
        "=B3=""Inconnue"""
    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
    With Selection.FormatConditions(1).Interior
        .PatternColorIndex = xlAutomatic
        .Color = 13395711
        .TintAndShade = 0
    End With
    Selection.FormatConditions(1).StopIfTrue = False
End Sub

[Gorfael]

Salut patanar et leforum
Pas d'infos précise, pas de réponse claire!!!
Si c'est B3 qui te gène, t'as qu'à le changer!

Selection ne veut rien dire, et c'est souvent inadéquat
En admetant que ce soit pour la cellule C3,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Sub Macro2()
[C3].FormatConditions.Add Type:=xlExpression, Formula1:= "=" & [C3].offset(0,-1).address(0,0) & "=""Inconnue"""

A+