Discussion :

[halaster08]

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 :

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

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 :

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

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.

[Marc-L]

Bonjour,

les versions locales d'Excel restant en anglais en interne, ce n'est donc pas un souci.
Sauf avec une fonction n'existant pas dans une version antérieure, ce qui n'est pas le cas ici …

En fait utiliser juste une cellule pour convertir la formule anglaise (Formula) en locale (FormulaLocal) !

___________________________________________________________________________________________________________

Je suis Paris, Egypte, Stockholm, London, Istanbul, Berlin, Nice, Bruxelles, Charlie, …

[halaster08]

Merci Marc-L, effectivement ça fonctionne bien comme ça.