Bonjour le forum,
J'ai été faire un tour sur le net et ai trouvé une macro me permettant de mettre une ligne sur 2 en gris sauf que c'est du jaune et moi il me faudrait un gris 20% et je ne sais pas comment faire.
Pourriez-vous m'aider à trouver une solution. voici la macro :
Sub aa()
Dim Plage As Range
Dim R As Range
Dim R2 As Range
If TypeName(Selection) <> "Range" Then Exit Sub
Set Plage = Selection
For Each R In Plage
If R.Row Mod 2 = 0 Then
If Not R2 Is Nothing Then
Set R2 = Application.Union(R2, R)
Else
Set R2 = R
End If
End If
Next R
R2.Interior.Color = vbYellow
End Sub
Par avance, merci.
Bien cordialement.
ericp