Somme de valeurs choisies par double clic

Bonjour à tous,

Je souhaite faire une somme de valeurs suite à un choix par double clic.

J'ai tenté le code ci-dessous :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    Dim i, ii
If Target.Columns.Count = 1 Then
i = Target.Row
ii = Target.Value
Set Notes = Range("E3:I33") ' plage où les notes existent
    CouleurVerte = vbGreen
    CouleurBlanche = vbWhite
    If Not Application.Intersect(Notes, Target) Is Nothing Then
        Cancel = True
        ActiveSheet.Protect Password:="laurent", UserInterfaceOnly:=True
        With Target
            If .Interior.Color = CouleurBlanche Then
                Range("E" & i & ":I" & i).Interior.Color = CouleurBlanche
                .Interior.Color = CouleurVerte
                Range("J" & i).Formula = " = " ii "
            Else
                .Interior.Color = CouleurBlanche
                Range("J" & i).Value = ""
            End If
        End With

    End If
    End If
End Sub

Mais ça me renvoie sans cesse au débogueur car la syntaxe est fausse.

Pour vous aider à comprendre, voici le document en question (onglet Qualité MDS - Princ.Dir.)

Mot de passe : laurent

Pouvez-vous m'aider svp?

Merci d'avance

Laurent

Bonsoir laurentzic ,

A voir ton code je pense que l'erreur vient de cette ligne :

Range("J" & i).Formula = " = " ii "

oui mais j'ai tenté plusieurs versions de syntaxe et il me met quand même l'erreur

Le problème est que tu essayes d'appliquer "Formula" à une variable qui de plus vaut "target.value", si c'est réellement ce que tu souhaites, tu as juste à écrire comme ceci:

Range("J" & i)=Target.value

oui apparemment ça fonctionne comme ça. Merci.

Cependant je suis incapable de faire une somme avec les case sélectionnée.

Si la case est sélectionnée (par le double clic) elle doit être prise en compte (avec la valeur associée) dans ma formule de somme, si elle ne l'est pas, elle reste en blanc et ''silencieuse''.

Quelqu'un a une idée de comment je pourrais intégrer ça dans mon code et où?

Merci d'avance

Bonjour,

Je réitère ma demande d'aide concernant la prise en compte de la cellule sélectionnée (en vert donc) dans la formule de somme de la cellule de totale (en %)

Voici le document en question, onglet Qualité MDS - Princ.Dir.

(Mot de passe : laurent)

Je souhaiterais que la cellule sélectionnée ligne par ligne soit incluse dans une formule de somme que l'on implanterait dans la cellule E34, transcrite en % dans la G34

Merci d'avance et bonne journée.