Bonjour,
Pas bien claire ta demande.
Dans mon programme, il ne peut pas y avoir 2 même lignes en bleu...
Justement si.
Tu définis une plage de 2 cellules, Range(Cells(Target.Row, 1), Cells(Target.Row + 1, 1)), et celles-ci passent bien en bleu...
Si tu n'en veux qu'une met : Target.
Et ajoute dans ton test Cancel=True pour éviter de passer en édition
eric
edit:
C'est ça que tu veux ?
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column <= 2 And Target.Row Mod 2 <> 0 And Target.Value <> "" Then 'Si valeur de la cible du double clic fait
Cancel = True
If Target.Interior.Color = RGB(255, 255, 255) Then
Target.Interior.Color = RGB(96, 192, 255)
Else
Target.Interior.Color = RGB(255, 255, 255)
End If
End If
End Sub