Protection et empecher de quitter

[dédé_la_sardine]

bonjour

j'ai cherché mais pas trouvé
alors voici mon pb
1- page d'accueil protégée
2- cellules protégées avec formules qui vont chercher des infos dans un onglet pas accessible (mais pas masqué sinon macro marche pas je crois)
3- si double clic dans cellules avec formules : msg d'erreur et j'aboutis dans la feuille censée etre pas accessible et donc pas visible

ma question
comment faire pour que si double clic dans cellule protégée, l'utilisateur ait un msg comme quoi elle est protégée, mais il essaye pas d'aller dans la feuille "source"

merci d'avance de vos lumieres
cdt
dédé

 

[Eric 45]

Re : Protection et empecher de quitter

Bonjour à tous
Bonjour dédé

Je ne sais pas si j'ai bien compris. Je te propose :

Puisque la feuille "accueil" est protégée, au moment où tu la protèges, dans la boite qui apparait, décoche l'option : "sélectionner les cellules verrouillées" et comme ceci personne ne pourra cliquer (ou double-cliquer) sur ces cellules.

Quant à ton point 2, je ne suis pas certain de ce que tu avances.

Eric

 

[jeanpierre]

Re : Protection et empecher de quitter

Bonjour dédé, Eric,

Question précise très imprécise.....

Peux-tu mettre un exemple très représentatif de ton souci ?

A te lire.

Jean-Pierre

Edit : Question et le reste au pluriel évidement..

 

[dédé_la_sardine]

Re : Protection et empecher de quitter

voici un exemple tout simple (mdp = "")
et je suis obligé de laisser la possibilité à l'utilisateur de cliquer sur des liens hypertextes
donc pas possible de décocher "sélectionner les cellules protégées"

merci d'avance
dédé

 

[alex67800]

Re : Protection et empecher de quitter

Bonsoir dédé,
ci-joint otn fichier modifié.
Regarde si cela te convient.
Je suis simplement passé par un petite macro sur ta feuille1 qui appel la valeur de la cellule de ta feuille2 x2Ta cellule reste verouillé pour les utlisateurs.
la macro déprotège et protège, affiche et masque ta feuille 2, sans que tu le vois. mdp= toto

Dis nous si cela te convient.

A+

Bonjour Jean-pierre,
Toujours une joie de te lire dans les fils.
suis pas un pro mais j'essaie d'aider avec mon humble connaissance. Il faut bien ce lancer un jour.

 

[jeanpierre]

Re : Protection et empecher de quitter

Re, Bonsoir Alex,

Tu as raison, c'est comme cela que l'on s'améliore même s'il y a quelques "gamelles" à la clé.

Bonne soirée.

Jean-Pierre

 

[kjin]

Re : Protection et empecher de quitter

Bonsoir,
Code qui sélectionne la cellule A1 si on doubleclick en D18

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Address = "$D$18" Then
Range("A1").Activate
MsgBox "Non,non,non et non !"
End If
End Sub

Edit : Avais oublié qu'il fallait un Message

A+
kjin

 

[dédé_la_sardine]

Re : Protection et empecher de quitter

bjr

@kjin : merci de l'exemple, ca peut etre tres utile

@alex67800
merci, ca fonctionne bien
mais ou est cette macro qui masque la feuil2 quand on clique sur la feuil1, et reprotege la feuil1 toute seule ? j'ai rien vu
cdt
dédé

 

[alex67800]

Re : Protection et empecher de quitter

bjr

@kjin : merci de l'exemple, ca peut etre tres utile

@alex67800
merci, ca fonctionne bien
mais ou est cette macro qui masque la feuil2 quand on clique sur la feuil1, et reprotege la feuil1 toute seule ? j'ai rien vu
cdt
dédé

Ici:

Private Sub Worksheet_activate()
Application.ScreenUpdating = False
Feuil2.Visible = xlSheetVisible
With Feuil1
Feuil1.Unprotect Password:="toto"
.Range("d18").Value = Feuil2.Range("c11") * 2
Feuil1.Protect Password:="toto"
End With
Feuil2.Visible = xlSheetHidden
Application.ScreenUpdating = True

End Sub

Tu visualiser le code sur feuil1.

 

[dédé_la_sardine]

Re : Protection et empecher de quitter

merci pour la réponse alex
mais ca me semble trop artisanal (traiter tous les liens de cette maniere)
je vais chercher un moyen d'intercepter les messages d'erreur liés au double clic dans une cellule protégée
merci encore
e

 

[alex67800]

Re : Protection et empecher de quitter

Bonsoir dédé,
cela fait longtemps.
En effet si ton problème concerne une multitude de données, l'exemple ne traitais que d'une cellule comme tu le demandais.

Un petit fichier aiderais à la compréhension du problème et d'apporter peut-être une solution plus élaborée, pour des plages de données.

A ma connaissance il ni a pas de moyen d'empêcher l'apparition du msg feuille protégé, c'est inhérent à excel. A moins d'empêcher la selection des cellules protégé.

La macro que je te proposait fait que ta feuille active cherche ses valeurs dans une feuille sources (avantage pas de formule visible).
Maintenant rien ne t'oblige de vérouiller ces cellules. Même si l'utilisateur change la valeur, le simple fait de quiter et revenir sur la feuille renvoi à nouveau la valeur de la fuille source, car elle est incrite dans une macro.

De plus tu peu suprimer ceci:

Feuil2.Visible = xlSheetVisible
Feuil2.Visible = xlSheetHidden

Sinon il y une piste intéressante ici:
https://www.excel-downloads.com/threads/empecher-lecriture-dans-une-cellule.78034/

Bonne recherche et continuation.

A+

 

[dédé_la_sardine]

Re : Protection et empecher de quitter

bjr

merci pour toutes vos réponses ou pistes/suggestions
je vais me faire un mix de tout ca, et ca devrait aller

a+
dédé