Discussion :

[zertupo]

Bonjour tout le monde

Voilà aprés quelques recherches, je n'ai pas trouvé de solution moi même, ni via l'aide d'internet...

J'ai un fichier de gestion on va dire, et j'aimerai bloquer quelques cellules spécifiques pour qu'on ne puisse pas les modifier manuellement (c'est à dire la sélectionner et taper directement un nouveau nombre dedans) car elle doit entrainer un certain nombre de calculer dont la valeur d'avant, qui est perdu si l'on fait comme cela. Mais par contre je veux qu'on double click dessus, pour lancer une macro évènementielle (code déjà fait).
Sur divers forum et site, j'ai trouvé comment bloquer la feuille ou quelques cellules mais aprés on ne peut plus double cliquer...

donc pour résumer, j'aimerai bloquer une cellule sauf si je double clique dessus.

Merci pour votre temps et votre aide

[Patrice740]

Bonjour,

Il suffit de protéger la feuille (y compris la cellule concernée) !

L'évènement BeforeDoubleClick se produit aussi sur les feuilles protégées.
Il suffit de déprotéger / re-protéger la feuille dans le code évènementiel

[parmi]

Exactement comme le dit Patrick740 que je salue

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    ActiveSheet.Unprotect "Mot de passe"   'on déprotège
        Cancel = True               'libère la cellule du mode édition
        Call TaProcedure(Target)    'appel de la procédure
    ActiveSheet.Protect "Mot de passe"   'on reprotège
End Sub
 
Sub TaProcedure(cell As Range)
    cell = "le calcul à y faire"
End Sub