Colorer les cases après double clic

anthoYS · 8 Septembre 2009

Bonjour,

Quelqu'un a t-il idée d'une macro permettant de colorer la case (cellule) voulu, par double clic?

Merci par avance, voir fichier joint.

Dull · 8 Septembre 2009

Re : Colorer les cases après double clic

salut antonYs, le Forum

a tester dans le Module de La feuille en question

Code:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
If Not Application.Intersect(Target, [B3:N15]) Is Nothing Then Target.Interior.ColorIndex = IIf(Target.Interior.ColorIndex = 4, xlNone, 4)
End Sub

Bonne Journée

anthoYS · 8 Septembre 2009

Re : Colorer les cases après double clic

Merci Dull,
ça marche!

Colorer les cases après double clic

anthoYS

XLDnaute Barbatruc

Pièces jointes

Dull

XLDnaute Barbatruc

anthoYS

XLDnaute Barbatruc

Discussions similaires

Colorer les cases après double clic

anthoYS

XLDnaute Barbatruc

Pièces jointes

Dull

XLDnaute Barbatruc

anthoYS

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency