colorier une plage de cellule

saradi

XLDnaute Nouveau
bonjour tout le monde s' il vous plait j'ai essayer avec ce programme ms il n'a pas marché;
Sub WKDAY()
For i = 1 To 5
If Range("D8") = "WK i" Then
Range("WEEKi").Interior.Color = 255
End If
Next i
End Sub
si la cellule d8 contient par exemple WK 1 donc on colorie la plage de cellule nommée WEEK1 et si d8 contient par exemple WK 2 donc on colorie la plage de cellule nommée WEEK2 et ainsi de suite
merci d'avance
 

Statistiques des forums

Discussions
311 715
Messages
2 081 822
Membres
101 822
dernier inscrit
holale