OVH Cloud OVH Cloud

Protection sur une feuille

4 réponses
Avatar
Vincent
Bonsoir.
J'ai un feuille de calcul qui est protégée.
Mais lorsque je double-clic sur une cellule qui contient une formule, cela
m'envoie sur la feuille qui contient les élémnets du calculs en amont
Comment faire afin d'éviter cela ?
Merci
Vincent

4 réponses

Avatar
michdenis
Bonjour Vincent,

Dans le module feuille où l'action se déroule, copie ceci :

Pour les cellules de la plage A1:G50 , si la feuille est protégée, si tu double-cliques... rien ne se passera. En dehors de
cette plage, tu auras un message t'avertissant que la feuille est protégée le cas échéant.

à toi de trouver une variante qui convienne à ton application.

'-------------------------------
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

If Not Intersect(Target, Range("A1:G50")) Is Nothing Then
If Me.ProtectContents = True Then
Cancel = True
End If
End If

End Sub
'-------------------------------


Salutations!



"Vincent" a écrit dans le message de news:
Bonsoir.
J'ai un feuille de calcul qui est protégée.
Mais lorsque je double-clic sur une cellule qui contient une formule, cela
m'envoie sur la feuille qui contient les élémnets du calculs en amont
Comment faire afin d'éviter cela ?
Merci
Vincent
Avatar
Vincent
Merci beaucoup Denis, c'est parfait,
mais pourquoi diable lorsque l'on clic sur une feuille protégé, cela fait
cela ?
Vincent

"michdenis" a écrit dans le message de
news:OLM%
Bonjour Vincent,

Dans le module feuille où l'action se déroule, copie ceci :

Pour les cellules de la plage A1:G50 , si la feuille est protégée, si tu
double-cliques... rien ne se passera. En dehors de

cette plage, tu auras un message t'avertissant que la feuille est protégée
le cas échéant.


à toi de trouver une variante qui convienne à ton application.

'-------------------------------
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)


If Not Intersect(Target, Range("A1:G50")) Is Nothing Then
If Me.ProtectContents = True Then
Cancel = True
End If
End If

End Sub
'-------------------------------


Salutations!



"Vincent" a écrit dans le message de
news:

Bonsoir.
J'ai un feuille de calcul qui est protégée.
Mais lorsque je double-clic sur une cellule qui contient une formule, cela
m'envoie sur la feuille qui contient les élémnets du calculs en amont
Comment faire afin d'éviter cela ?
Merci
Vincent





Avatar
michdenis
Bonjour Vincent,

Le fait de double-cliquer sur une cellule fait passer cette cellule en mode édition (le curseur clignote à l'intérieur de
celle-ci) ... c'est comme utilisé la touche F2... difficile de permettre cela si la feuille est protégée ! non ?


Salutations!


"Vincent" a écrit dans le message de news:%
Merci beaucoup Denis, c'est parfait,
mais pourquoi diable lorsque l'on clic sur une feuille protégé, cela fait
cela ?
Vincent

"michdenis" a écrit dans le message de
news:OLM%
Bonjour Vincent,

Dans le module feuille où l'action se déroule, copie ceci :

Pour les cellules de la plage A1:G50 , si la feuille est protégée, si tu
double-cliques... rien ne se passera. En dehors de

cette plage, tu auras un message t'avertissant que la feuille est protégée
le cas échéant.


à toi de trouver une variante qui convienne à ton application.

'-------------------------------
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)


If Not Intersect(Target, Range("A1:G50")) Is Nothing Then
If Me.ProtectContents = True Then
Cancel = True
End If
End If

End Sub
'-------------------------------


Salutations!



"Vincent" a écrit dans le message de
news:

Bonsoir.
J'ai un feuille de calcul qui est protégée.
Mais lorsque je double-clic sur une cellule qui contient une formule, cela
m'envoie sur la feuille qui contient les élémnets du calculs en amont
Comment faire afin d'éviter cela ?
Merci
Vincent





Avatar
Vincent
Ok merci encore Denis
Vincent

"michdenis" a écrit dans le message de
news:
Bonjour Vincent,

Le fait de double-cliquer sur une cellule fait passer cette cellule en
mode édition (le curseur clignote à l'intérieur de

celle-ci) ... c'est comme utilisé la touche F2... difficile de permettre
cela si la feuille est protégée ! non ?



Salutations!


"Vincent" a écrit dans le message de
news:%

Merci beaucoup Denis, c'est parfait,
mais pourquoi diable lorsque l'on clic sur une feuille protégé, cela fait
cela ?
Vincent

"michdenis" a écrit dans le message de
news:OLM%
Bonjour Vincent,

Dans le module feuille où l'action se déroule, copie ceci :

Pour les cellules de la plage A1:G50 , si la feuille est protégée, si tu
double-cliques... rien ne se passera. En dehors de

cette plage, tu auras un message t'avertissant que la feuille est
protégée


le cas échéant.

à toi de trouver une variante qui convienne à ton application.

'-------------------------------
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)


If Not Intersect(Target, Range("A1:G50")) Is Nothing Then
If Me.ProtectContents = True Then
Cancel = True
End If
End If

End Sub
'-------------------------------


Salutations!



"Vincent" a écrit dans le message de
news:

Bonsoir.
J'ai un feuille de calcul qui est protégée.
Mais lorsque je double-clic sur une cellule qui contient une formule,
cela


m'envoie sur la feuille qui contient les élémnets du calculs en amont
Comment faire afin d'éviter cela ?
Merci
Vincent