VBA - Action suite à double clic

Question

Je voudrais que grace à un double-clic et en fonction de la valeur de la cellule, une action se passe. Insertion d'une ligne identique noircir la ligne,...

Donc si dans ma cellule de la colonne A il est écrit "plus" une ligne doit s'ajouter, si il est écrit sélectionner la ligne doit devenir jaune,...

Le problème est que rien ne se passe...

Voici mon code...

Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

If Target.Value = "plus" Then
With Target
    Range("A" & .Row + 1).EntireRow.Insert
    Range("A" & .Row).EntireRow.Copy
    Range("A" & .Row + 1).EntireRow.PasteSpecial
End With
End If
Cancel = True

End Sub

Banzai64 · Answer

Si cela fonctionne Attention dans ta cellule respectes bien la casse du mot "plus"...