(Re) Bonjour,
quel code / modification à apporter à ce code pour ne le faire appliquer qu'à une sélection de plages ?
ex plages F15:F31;H15:H31;J15:JI31;L15:L31;etc...
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
Target.Interior.ColorIndex = Cells(Target.Row, 1).Interior.ColorIndex
End Sub
merci par avance de votre coopération.
quel code / modification à apporter à ce code pour ne le faire appliquer qu'à une sélection de plages ?
ex plages F15:F31;H15:H31;J15:JI31;L15:L31;etc...
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
Target.Interior.ColorIndex = Cells(Target.Row, 1).Interior.ColorIndex
End Sub
merci par avance de votre coopération.