Format conditionel et différente langue d'excel
Bonjour,
Petit souci du jour, j'ai une macro qui ajoute des MFC mon excel est en anglais celui de la personne qui doit l'utiliser en français, via l'enregistreur de macro et après retouche j'obtient le code suivant:
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
| dl = Range("A" & Rows.Count).End(xlUp).Row
Range("A2:I" & dl).Select
Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
"=NOT(COUNTBLANK($G2)=1)"
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
With Selection.FormatConditions(1).Interior
.PatternColorIndex = xlAutomatic
.Color = 49407
.TintAndShade = 0
End With
Selection.FormatConditions(1).StopIfTrue = False
Range("A2:I" & dl).FormatConditions.Add Type:=xlExpression, Formula1:= _
"=NOT(COUNTBLANK($H2)=1)"
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
With Selection.FormatConditions(1).Interior
.PatternColorIndex = xlAutomatic
.Color = 255
.TintAndShade = 0
End With |
La partie qui me pose problème est celle-ci
Code:
1
2
| FormatConditions.Add Type:=xlExpression, Formula1:= _
"=NOT(COUNTBLANK($G2)=1)" |
Cette formule qui marche quand Excel est en anglais, ne marche plus quand Excel est en français, contrairement a une formule mise dans une cellule où Excel fait la traduction tout seul, là il laisse le tout en anglais et la MFC ne fonctionne pas.
Ma question est donc y a-t-il moyen de lui faire traduire cette formule(si oui comment)? ou dois-je modifier le code pour prendre en compte la langue d'excel.
Merci d'avance.
