Bonjour
je n'arrive pas à écrire en VBA un format conditionnel qui prendrait sa condition sur une référence de cellule relative ... Et si j'utilise une variable pour définir la cellule relative en question , cette variable n'est pas reconnue ensuite
dans les lignes qui définissent le format conditionnel ...
Merci ...
Code :
- Sub Format_Conditionnel()
- Dim MaRéférence As Range
- Set MaRéférence = Range("C" & ActiveCell.Row)
- Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
- "=JOURSEM(MaRéférence;1)=1"
- Selection.FormatConditions(1).Interior.ColorIndex = 36
- End Sub
|