Merci beaucoup pour ton aide ..
En fait ma macro inclut plusieurs cas selon que ma cellule contient ou non le mot France et en fonction de cela, je lui demande de coloriser la ligne corespondante d'une couleur différente,
j'ai distingué 4 cas : avec France seul / un cas nommé 'Autres' / combinaison incluant le mot france /combinaison l'excluant
La partie le contenat me pose problème .. partie bleue ..
Peux tu jeter un coup d'oeil à ma macro .. :
Je n'arrive pas à le traduire correctement...
If ActiveCell.Value = ' France' 'cas France seul
ActiveCell.Offset(1, 0).Select ' aucune couleur
'sélectionne une catégorie nommée 'autres' c'est pour coloriser les cellules correspondante sur la meme ligne mais sur une autre colonne
ElseIf ActiveCell.Value <> 'Autres' And ActiveCell.Offset(0, 1).Value = 0 Then
ActiveCell.Offset(0, -4).Select
With Selection.Interior
.ColorIndex = 15
End With
ActiveCell.Offset(0, 1).Select
With Selection.Interior
.ColorIndex = 15
End With
ActiveCell.Offset(1, 3).Select
[size=4] ' sélectionne les combinaisons avec la France par exple France/Belgique[/size]
ElseIf Selection.AutoFilter Field:=1, Criteria1:='=*NBP*', Operator:=xlAnd Then
ActiveCell.Offset(0, -4).Select
With Selection.Interior
.ColorIndex = 15
End With
' sélectionne tous les autres cas dont les combinaisons excluant France
Else: ActiveCell.Offset(0, -4).Select
With Selection.Interior
.ColorIndex = 20
End With
ActiveCell.Offset(0, 1).Select
With Selection.Interior
.ColorIndex = 20
End With
ActiveCell.Offset(1, 3).Select
End If