colorer en vert le fond (une plage) bien définit si double clic dans cellule spécifiq

gilbert_RGI

XLDnaute Barbatruc

• 22 Août 2012

• #2

Re : colorer en vert le fond (une plage) bien définit si double clic dans cellule spé

bonjour

essayez ceci

Code:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Target.Column <> "8" Then Exit Sub
    If Target.Row Mod 2 = 1 Then
        rep = MsgBox("voulez-vous effacer la couleur ?", vbYesNo, "couleur")
        If rep = vbYes Then
            Range("a" & Target.Row & ": h" & (Target.Row - 1)).Interior.ColorIndex = xlNone
        Else
            Exit Sub
        End If
    Else
        Range("a" & Target.Row & ": h" & (Target.Row + 1)).Interior.ColorIndex = 36
    End If
End Sub

a mettre dans le code de la feuille

double clique dans la colonne H

 

Dernière édition: 22 Août 2012

Vote positif 0 Vote négatif

anthoYS

XLDnaute Barbatruc

• 22 Août 2012

• #3

Re : colorer en vert le fond (une plage) bien définit si double clic dans cellule spé

bonsoir,

merci beaucoup, la couleur c'étais le vert mais bon je sais faire.
je l'avais mis dans l'onglet 'attendu pour exemple.


à+

 

Vote positif 0 Vote négatif

gilbert_RGI

XLDnaute Barbatruc

• 22 Août 2012

• #4

Re : colorer en vert le fond (une plage) bien définit si double clic dans cellule spé

anthoYS à dit:

bonsoir,

merci beaucoup, la couleur c'étais le vert mais bon je sais faire.
je l'avais mis dans l'onglet 'attendu pour exemple.


à+

Cliquez pour agrandir...

ce n'est pas le plus important

mais pour le fun

remplacer colorindex = 36 par color = 65280

 

Vote positif 0 Vote négatif

anthoYS

XLDnaute Barbatruc

• 23 Août 2012

• #5

Re : colorer en vert le fond (une plage) bien définit si double clic dans cellule spé

gilbert_RGI à dit:

ce n'est pas le plus important

mais pour le fun

remplacer colorindex = 36 par color = 65280

Cliquez pour agrandir...

salut,


pour ma part, j'opte pour le "color = 4".


à+

 

Vote positif 0 Vote négatif

gilbert_RGI

XLDnaute Barbatruc

• 23 Août 2012

• #6

Re : colorer en vert le fond (une plage) bien définit si double clic dans cellule spé

erreur le "color =4" fait noir mais le "ColorIndex = 4" fait vert comme le "color =65280"

@+

 

Vote positif 0 Vote négatif

anthoYS

XLDnaute Barbatruc

• 24 Août 2012

• #7

Re : colorer en vert le fond (une plage) bien définit si double clic dans cellule spé

re,

oui pardon je n'ai pas été rigoureux (me sent mal actuellement, fatigué, à côté de mes pompes). donc oui je voulais dire colorindex.


bien à vous,

à+

 

Vote positif 0 Vote négatif