Protection Cellule et Worksheet_SelectionChange

Bonjour,

Classeur en lecture seule sauf si Username habilité, donc possiblement protégé.
Néanmoins, TOUS les utilisateurs doivent pouvoir ouvrir MenuPrint en cliquant sur A3 (cf. Worksheet_selectionChange)
Soit je déverrouille A3 mais l'utilisateur peut effacer son libellé, soit elle reste verrouillée et donc inaccessible.

Code:

---

1 2 3 4

Private Sub Worksheet_selectionChange(ByVal Target As Range)   If Target.Address = "$A$3" Then MenuPrint.Show

---

Besoin de vos lumières, si possible,
Cordialement,
jp

Salut.

Une solution serait de déporter l'action d'ouverture de menuprint, par exemple sur un bouton ou sur une autre cellule qui n'aurait que cette utilité-là.

Bonjour Pierre,

Certes, mais le recours à une cellule me plaisait bien...

Si la dé-protection de cette seule cellule me permet de la rendre accessible à tout utilisateur, peut-être est-il possible d'ajouter un Undo si elle est effacée par inadvertance ?

Cordialement,
jp

Ok. Mais pourquoi justement celle-là? Tu veux qu'elle contienne un libellé "comme s'il s'agissait d'un bouton"?

Dans le verrouillage des cellules, tu peux demander que l'on puisse sélectionner les cellules verrouillées, mais cela impacte toutes les cellules verrouillées.

Tu pourrais la "verrouiller" par validation (après y avoir saisi le texte du menu):

Pièce jointe 576479

Bonjour,

Citation:

---

Ok. Mais pourquoi justement celle-là? Tu veux qu'elle contienne un libellé "comme s'il s'agissait d'un bouton"?

---

Tout à fait ! J'utilise souvent les Cellules en en-tête de colonne pour générer des tris (par exemple) et pour lesquelles je peux modifier le motif ou la police suivant qu'elle représente la colonne triée ou pas.

Validation de Données / Personnalisé / (Formule) FAUX

Je ne comprends pas ce que ça fait

Cdt
jp

La validation par formule s'appuie sur le fait que la formule saisie dans la fenêtre de mise en place de la validation renvoie VRAI pour laisser passer la saisie. Dès lors, la formule =Faux renvoyant toujours Faux ( :aie: ), la saisie est bloquée. Tu peux modifier le message apparaissant lors de la saisie "interdite" avec le troisième onglet de la fenêtre de validation.


Tu pourrais également bloquer cela par VBA

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo Catch   If Target.Address = "$A$1" Then Application.EnableEvents = False Application.Undo End If   Catch: Application.EnableEvents = True End Sub

---

Pour interdire la modification des entêtes d'un tableau structuré (voir mon tuto), tu pourrais aussi utiliser ceci:

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo Catch   If Not Intersect(Target, Range("tableau1[#Headers]")) Is Nothing Then Application.EnableEvents = False Application.Undo End If   Catch: Application.EnableEvents = True End Sub

---

Le bémol à ces possibilités, en ce compris la validation, c'est qu'elles laissent l'utilisateur saisir la donnée pour la refuser ensuite.

Bonjour,

Merci pour le précieux lien vers les Tableaux structurés (j'y ai goûté dernièrement et j'en fais la promo dans mon entourage :) )

Merci pour ces deux solutions ; je n'ai testé que la première mais elle répond parfaitement à ma question.

Je réalise néanmoins qu'il est impossible à l'utilisateur de modifier le libellé de la cellule "$A$3". Dès lors qu'il clique dessus, Worksheet_selectionChange(ByVal Target As Range) va automatiquement ouvrir le MenuPrint !

Code:

---

If Target.Address = "$A$3" Then MenuPrint.Show

---

Merci beaucoup pour ces réponses et ces pistes à étudier,

Cordialement,
jp

Citation:

---

Envoyé par jpma75

Bonjour,

Merci pour le précieux lien vers les Tableaux structurés (j'y ai goûté dernièrement et j'en fais la promo dans mon entourage :) )

Merci pour ces deux solutions ; je n'ai testé que la première mais elle répond parfaitement à ma question.

Je réalise néanmoins qu'il est impossible à l'utilisateur de modifier le libellé de la cellule "$A$3". Dès lors qu'il clique dessus, Worksheet_selectionChange(ByVal Target As Range) va automatiquement ouvrir le MenuPrint !

Code:

---

If Target.Address = "$A$3" Then MenuPrint.Show

---

Merci beaucoup pour ces réponses et ces pistes à étudier,

Cordialement,
jp

---

Dans ce cas, il faudrait désactiver le doubleclic sur la cellule, car le double-clic inhibe le clic.

Code:

---

1 2 3

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Target.Address = "$A$3" Then Cancel = True End Sub

---

Citation:

---

Dans ce cas, il faudrait désactiver le doubleclic sur la cellule, car le double-clic inhibe le clic.

---

Je n'ai pas bien compris. Le fait que Worksheet_selectionChange(ByVal Target As Range) empêche l'utilisateur de se positionner sur la cellule et accessoirement de la modifier me convient parfaitement !

Worksheet_selectionChange(ByVal Target As Range) est une bonne alternative au verrouillage de la cellule même si tel n'était pas son but initialement !

Cordialement,
jp

Si l'utilisateur se contente de cliquer en A3, le menu se lance et donc, tu n'as besoin de rien d'autre. Mais s'il réalise un double-clic, tu dois l'annuler sinon l'utilisateur entre en mode édition et peut modifier la formule. Si, après avoir cliqué, le menu se lance mais que A3 est toujours sélectionné, l'utilisateur pourrait soit double-cliquer, soit utiliser F2 pour entrer dans la cellule.

L'utilisateur pourrait aussi sélectionner une plus grande plage dans laquelle A3 se trouve, puis voyager dans la plage avec ENTER ou TAB et arriver sur A3 pour l'éditer avec F2.

A toi de voir si tu veux te prémunir de ces situations et si oui, comment.

C'est pour ces raisons que je ne suis pas friand d'une solution qui utilise des cellules comme "bouton de commande". Ca demande une gymnastique si tu ne veux/peux pas accepter que toutes les cellules verrouillées se comportent de façon identique ;)

Citation:

---

Si l'utilisateur se contente de cliquer en A3, le menu se lance et donc, tu n'as besoin de rien d'autre.

---

C'est ce qu'il fera le plus clair du temps. Quand je rajoute des lignes de code, c'est d'abord pour protéger l'utilisateur de manips inopportunes et non par crainte d'une action malveillante.

Citation:

---

Mais s'il réalise un double-clic, tu dois l'annuler sinon l'utilisateur entre en mode édition et peut modifier la formule (...)

---

Dans mon classeur, le simple ou double-clic provoque le même effet : il ouvre le UF ! L'usage de F2 pour entrer dans la cellule n'est manifestement pas possible.

Citation:

---

L'utilisateur pourrait aussi sélectionner une plus grande plage dans laquelle A3 se trouve, puis voyager dans la plage avec ENTER ou TAB et arriver sur A3 pour l'éditer avec F2.

---

Oups, j'ai testé et j'arrive effectivement (mais ça ne te surprendra pas :D ) à modifier le libellé de la cellule. Avant que "mes" utilisateurs en arrivent à jouer avec TAB pour en arriver là...

Citation:

---

C'est pour ces raisons que je ne suis pas friand d'une solution qui utilise des cellules comme "bouton de commande".

---

Il faut avouer que pour faire des tris en cliquant sur les En-tête de colonnes, c'est quand même pratique, non ?!

Merci beaucoup pour ces conseils de sécurité !!

Cordialement,
jp

Citation:

---

Envoyé par jpma75

[...]
Il faut avouer que pour faire des tris en cliquant sur les En-tête de colonnes, c'est quand même pratique, non ?![...]

---

C'est surtout, de mon estime, se donner bien du mal alors que les outils natifs d'Excel permettent cela, surtout si tu utilises les tableaux structurés, et que le clic droit dans une cellule du tableau offre les mêmes outils.

Pièce jointe 576522


Pièce jointe 576523



N'est-il pas plus simple de former les utilisateurs aux possibilités d'Excel? (Parole de formateur ;) )

Citation:

---

N'est-il pas plus simple de former les utilisateurs aux possibilités d'Excel? (Parole de formateur)

---

Mon rêve, au moins pour qu'ils s'approprient ce que je mets à leur disposition et qu'ils soient force de proposition, mais quid de leur envie ?!

Dans mon cas et sans rentrer dans le détail, ils sont nombreux à utiliser ces applications (toujours conçues pour optimiser leurs ressources...) ; donc preneurs, voire demandeurs mais peu soucieux de rentrer dans le détail d'Excel.

Certes, les tableaux structurés (qui te sont chers :D ) offrent cette possibilité mais je me place aussi dans le cas où les tableaux ne le sont pas... !

PS : il y a des noms comme le tien qui impressionnent (et c'est peu de le dire) les amateurs de mon espèce... Je n'ose même pas imaginer l'insigne honneur que d'être "élève" dans le cadre de tes formations ...

L'accès à ce forum et le puits sans fond de connaissances des éminents contributeurs est une ressource incroyable pour les plus modestes d'entre nous.

Merci à toi et merci à tous ceux qui nous viennent en aide pour nous sortir de nos moments de solitude face à des difficultés qui nous semblent momentanément insurmontables.

Par respect pour ces précieuses contributions, je m'efforce toujours de comprendre avant d'appliquer les conseils.

Cordialement,
jp

Les filtres ne sont pas réservés aux tableaux structurés. Tu peux les placer sur une plage rectangulaire "classique". Après, à toi de voir ce qui te/leur convient le mieux ;)

Bonne soirée ;)


Merci pour ton appréciation de l'aide que les contributeurs de ce forum essaient d'apporter jour après jour ;)