Bonjour ,

Je demande a l'utilisateur de selectioner une plage de cellule grace à :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 
Dim p as range
 
On Error Resume Next
    Set P = Application.InputBox("Sélectionnez une cellule ou une plage :", Type:=8)
    On Error GoTo 0
    If P Is Nothing Then MsgBox "Sélection annulée"
Maintenant , j'aimerais effectuer un cadrillage dans cette plage , colorier la colone X de telle couleur et la colone Y de telle couleur .

Comment faire svp ?

Je sais colorier une colone (facile me direz vous) mais pas a m'arreter a la derniere ligne de la selection de l'utilisateur .

Cordialement.